[slime-cvs] CVS slime/contrib

[CVS User sboukarev]

Update of /project/slime/cvsroot/slime/contrib
In directory cl-net:/tmp/cvs-serv5651

Modified Files:
	ChangeLog slime-presentations.el 
Log Message:
* slime-presentations.el (slime-presentation-write-result): Do
slime-repl-show-maximum-output at the end. This really solves
jumping.


--- /project/slime/cvsroot/slime/contrib/ChangeLog	2010/05/07 08:27:20	1.376
+++ /project/slime/cvsroot/slime/contrib/ChangeLog	2010/05/08 04:57:23	1.377
@@ -1,3 +1,9 @@
+2010-05-08  Stas Boukarev  <stassats at gmail.com>
+
+	* slime-presentations.el (slime-presentation-write-result): Do
+	slime-repl-show-maximum-output at the end. This really solves
+	jumping.
+
 2010-05-07  Stas Boukarev  <stassats at gmail.com>
 
 	* slime-presentations.el (slime-presentation-write): Reuse
--- /project/slime/cvsroot/slime/contrib/slime-presentations.el	2010/05/07 08:27:20	1.33
+++ /project/slime/cvsroot/slime/contrib/slime-presentations.el	2010/05/08 04:57:23	1.34
@@ -760,7 +760,8 @@
                                       rear-nonsticky (face))
         (insert string))
       ;; Move the input-start marker after the REPL result.
-      (set-marker marker (point)))))
+      (set-marker marker (point)))
+    (slime-repl-show-maximum-output)))
 
 (defun slime-presentation-write (string &optional target)
   (case target