GitLab

at 2025-06-24T06:26:02-07:00

Fix a few typos in comments and strings.

 	(restart-case 

 	    (error 'simple-package-error

 		   :package pkg

-		   :format-control (intl:gettext "~A as already a local nickname for the package ~A in ~A")

+		   :format-control (intl:gettext "~A is already a local nickname for the package ~A in ~A")

 		   :format-arguments (list local-nickname actual-pkg pkg))

 	  (keep-old-nickname ()

 	    :report (lambda (stream)

 	    ;; from a package other than its home package.

 	    (unless (and accessible (eq symbol object))

 	      ;; If the actual symbol package has a local nickname in

-	      ;; *package*, use that as the symbol name instead of the

+	      ;; *package*, use that as the package name instead of the

 	      ;; actual symbol package name.

 	      (let ((local-nicks (package-%local-nicknames *package*))

 		    (pkg-name (package-name package)))

Raymond Toy pushed to branch issue-415-add-package-local-nicknames at cmucl / cmucl

Commits:

2 changed files:

Changes: