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

[Luke Gorrie]

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

Modified Files:
	slime.el 
Log Message:
(slime-space): Don't give an error when not connected, to avoid
feeping.

Date: Tue Oct 21 16:51:45 2003
Author: lgorrie

Index: slime/slime.el
diff -u slime/slime.el:1.51 slime/slime.el:1.52
--- slime/slime.el:1.51	Tue Oct 21 16:38:49 2003
+++ slime/slime.el	Tue Oct 21 16:51:44 2003
@@ -1551,9 +1551,10 @@
 Designed to be bound to the SPC key."
   (interactive)
   (insert " ")
-  (unless (slime-busy-p)
-    (when (slime-function-called-at-point/line)
-      (slime-arglist (symbol-name (slime-function-called-at-point/line))))))
+  (when (and (slime-connected-p)
+             (not (slime-busy-p))
+             (slime-function-called-at-point/line))
+    (slime-arglist (symbol-name (slime-function-called-at-point/line)))))
 
 (defun slime-arglist (symbol-name)
   "Show the argument list for the nearest function call, if any."