X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcold%2Fwarm.lisp;h=d02357c93c5985a03c471b3b848374aacbc7c5e0;hb=f8893c7c658bf9d9e0757c63e47af2fdea810f04;hp=838b4d2662d0a38ed83b0be9111557402c2356c1;hpb=784b195743728436795b90f95273c3535ebee9a5;p=sbcl.git

diff --git a/src/cold/warm.lisp b/src/cold/warm.lisp
index 838b4d2..d02357c 100644
--- a/src/cold/warm.lisp
+++ b/src/cold/warm.lisp
@@ -211,13 +211,3 @@
 	       "public: the default package for user code and data")
 #+sb-doc (setf (documentation (find-package "KEYWORD") t)
 	       "public: home of keywords")
-
-;;; KLUDGE: It'd be nicer to do this in the table with the other
-;;; non-standard packages. -- WHN 19991206
-#+sb-doc (setf (documentation (find-package "SB-SLOT-ACCESSOR-NAME") t)
-	       "private: home of CLOS slot accessor internal names")
-
-;;; FIXME: There doesn't seem to be any easy way to get package doc strings
-;;; through the cold boot process. They need to be set somewhere. Maybe the
-;;; easiest thing to do is to read them out of package-data-list.lisp-expr
-;;; now?