[slime-cvs] CVS update: slime/swank-loader.lisp

[Helmut Eller]

Update of /project/slime/cvsroot/slime
In directory common-lisp.net:/tmp/cvs-serv24652

Modified Files:
	swank-loader.lisp 
Log Message:
Move readtable-alist initialization to the swank-sbcl.lisp.

Date: Wed Jun 16 13:25:46 2004
Author: heller

Index: slime/swank-loader.lisp
diff -u slime/swank-loader.lisp:1.25 slime/swank-loader.lisp:1.26
--- slime/swank-loader.lisp:1.25	Thu Jun 10 10:57:16 2004
+++ slime/swank-loader.lisp	Wed Jun 16 13:25:46 2004
@@ -102,12 +102,6 @@
 
 (funcall (intern (string :warn-unimplemented-interfaces) :swank-backend))
 
-#+sbcl
-(let ((readtable (swank-backend::shebang-readtable)))
-  (dolist (p (list-all-packages))
-    (when (swank-backend::sbcl-package-p p)
-      (push (cons (package-name p) readtable) swank::*readtable-alist*))))
-
 (when (user-init-file)
   (load (user-init-file)))