X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Ftarget-package.lisp;h=2e0e47fe25c8370da0406c6f433e27ac180445d4;hb=f1e41363fc77b7fc7da410eafef587b683be777a;hp=6a56f8e466d0722bbb2bff67b2f8e33296c2e6b0;hpb=b0b221088b889b6d3ae67e551b93fe1a6cfec878;p=sbcl.git

diff --git a/src/code/target-package.lisp b/src/code/target-package.lisp
index 6a56f8e..2e0e47f 100644
--- a/src/code/target-package.lisp
+++ b/src/code/target-package.lisp
@@ -353,9 +353,9 @@ the reader.
 
 When printing a package prefix for a symbol with a package local nickname, the
 local nickname is used instead of the real name in order to preserve
-read/print consistency.
+print-read consistency.
 
-See also: ADD-PACKAGE-LOCAL-NICKNAME, PACKAGE-LOCALLY-NICKNAMED-BY,
+See also: ADD-PACKAGE-LOCAL-NICKNAME, PACKAGE-LOCALLY-NICKNAMED-BY-LIST,
 REMOVE-PACKAGE-LOCAL-NICKNAME, and the DEFPACKAGE option :LOCAL-NICKNAMES.
 
 Experimental: interface subject to change."
@@ -363,7 +363,7 @@ Experimental: interface subject to change."
    (package-%local-nicknames
     (find-undeleted-package-or-lose package-designator))))
 
-(defun package-locally-nicknamed-by (package-designator)
+(defun package-locally-nicknamed-by-list (package-designator)
   "Returns a list of packages which have a local nickname for the designated
 package.
 
@@ -394,9 +394,9 @@ reader.
 
 When printing a package prefix for a symbol with a package local nickname,
 local nickname is used instead of the real name in order to preserve
-read/print consistency.
+print-read consistency.
 
-See also: PACKAGE-LOCAL-NICKNAMES, PACKAGE-LOCALLY-NICKNAMED-BY,
+See also: PACKAGE-LOCAL-NICKNAMES, PACKAGE-LOCALLY-NICKNAMED-BY-LIST,
 REMOVE-PACKAGE-LOCAL-NICKNAME, and the DEFPACKAGE option :LOCAL-NICKNAMES.
 
 Experimental: interface subject to change."
@@ -446,7 +446,7 @@ another package, it is removed. Returns true if the nickname existed and was
 removed, and NIL otherwise.
 
 See also: ADD-PACKAGE-LOCAL-NICKNAME, PACKAGE-LOCAL-NICKNAMES,
-PACKAGE-LOCALLY-NICKNAMED-BY, and the DEFPACKAGE option :LOCAL-NICKNAMES.
+PACKAGE-LOCALLY-NICKNAMED-BY-LIST, and the DEFPACKAGE option :LOCAL-NICKNAMES.
 
 Experimental: interface subject to change."
   (let* ((nick (string old-nickname))