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

[Luke Gorrie]

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

Modified Files:
	slime.el 
Log Message:
(slime-repl-clear-output): Avoid clearing the previous REPL expression
too. Patch from Andras Simon.

Date: Fri Jul  2 17:01:40 2004
Author: lgorrie

Index: slime/slime.el
diff -u slime/slime.el:1.354 slime/slime.el:1.355
--- slime/slime.el:1.354	Fri Jul  2 12:09:35 2004
+++ slime/slime.el	Fri Jul  2 17:01:40 2004
@@ -2428,6 +2428,8 @@
   (interactive)
   (let ((start (save-excursion 
                  (slime-repl-previous-prompt)
+                 (ignore-errors (forward-sexp))
+                 (forward-line)
                  (point)))
         (end (1- (slime-repl-input-line-beginning-position))))
     (when (< start end)