[slime-cvs] CVS update: slime/slime.el

[Andras Simon]

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

Modified Files:
	slime.el 
Log Message:
call slime-start-lisp in ,restart-inferior-lisp with the right number of args
Date: Tue Nov  9 13:15:45 2004
Author: asimon

Index: slime/slime.el
diff -u slime/slime.el:1.419 slime/slime.el:1.420
--- slime/slime.el:1.419	Tue Nov  9 11:23:30 2004
+++ slime/slime.el	Tue Nov  9 13:15:44 2004
@@ -3094,7 +3094,7 @@
                   (sit-for 0 20))
                 (let* ((args (mapconcat #'identity (process-command proc) " "))
                        (buffer (buffer-name (process-buffer proc)))
-                       (new-proc (slime-start-lisp args buffer)))
+                       (new-proc (slime-start-lisp args buffer (slime-init-command))))
                 (slime-inferior-connect new-proc)))))
   (:one-liner "Restart *inferior-lisp* and reconnect SLIME."))