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

[Alan Ruttenberg]

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

Modified Files:
	slime.el ChangeLog 
Log Message:
(slime-repl-return) don't copy presentation to input if	already in input area.

Date: Fri Sep 16 05:43:08 2005
Author: aruttenberg

Index: slime/slime.el
diff -u slime/slime.el:1.547 slime/slime.el:1.548
--- slime/slime.el:1.547	Thu Sep 15 10:25:42 2005
+++ slime/slime.el	Fri Sep 16 05:43:08 2005
@@ -3334,7 +3334,8 @@
               (< (point) slime-repl-input-start-mark))
          (slime-repl-grab-old-input end-of-input)
          (slime-repl-recenter-if-needed))
-        ((car (slime-presentation-around-or-before-point (point)))
+        ((and (car (slime-presentation-around-or-before-point (point)))
+                   (< (point) slime-repl-input-start-mark))
          (slime-repl-grab-old-output end-of-input)
          (slime-repl-recenter-if-needed))
         ((slime-input-complete-p slime-repl-input-start-mark 


Index: slime/ChangeLog
diff -u slime/ChangeLog:1.780 slime/ChangeLog:1.781
--- slime/ChangeLog:1.780	Thu Sep 15 10:31:50 2005
+++ slime/ChangeLog	Fri Sep 16 05:43:08 2005
@@ -1,3 +1,7 @@
+2005-09-15  Alan Ruttenberg <alanr-l at mumble.net>
+	* slime.el (slime-repl-return) don't copy presentation to input if
+	already in input area.
+	
 2005-09-15  Helmut Eller  <heller at common-lisp.net>
 
 	* swank-clisp.lisp (compute-backtrace): Include only "function