[slime-devel] slime-repl-defparameter

[Kilian Sprotte]

Hi,

this little patch makes slime-repl-defparameter functional again.
(Correcting two typos. :)

Cheers,
  Kilian

Index: slime.el
==========================================================
RCS file: /project/slime/cvsroot/slime/slime.el,v
retrieving revision 1.748
diff -u -r1.748 slime.el
--- slime.el    17 Jan 2007 15:44:29 -0000      1.748
+++ slime.el    17 Jan 2007 23:51:08 -0000
@@ -4473,10 +4473,10 @@
 (defslime-repl-shortcut slime-repl-defparameter ("defparameter" "!")
   (:handler (lambda (name value)
               (interactive (list (slime-read-symbol-name "Name (symbol): " t)
-                                 (slime-read-from-minibuffer "Value: " "*")))
+                                 (slime-read-from-minibuffer "Value:
" :initial-value "*")))
               (insert "(cl:defparameter " name " " value
                       " \"REPL generated global variable.\")")
-              (slime-repl-send-input)))
+              (slime-repl-send-input t)))
   (:one-liner "Define a new global, special, variable."))

 (defslime-repl-shortcut slime-repl-compile-and-load ("compile-and-load" "cl")