[slime-cvs] CVS slime/contrib

[trittweiler]

Update of /project/slime/cvsroot/slime/contrib
In directory clnet:/tmp/cvs-serv713/contrib

Modified Files:
	swank-presentations.lisp 
Log Message:

Having the `slime-presentations' contrib enabled, (princ 10)
resulted in "1010" rather than "10\n10". (This also caused a
regression in the `repl-test' test case.)
	
* swank-presentations.lisp (present-repl-results): Emit fresh-line
  as the original SEND-REPL-RESULTS-TO-EMACS does.


--- /project/slime/cvsroot/slime/contrib/swank-presentations.lisp	2007/09/04 09:49:10	1.4
+++ /project/slime/cvsroot/slime/contrib/swank-presentations.lisp	2008/02/21 20:49:10	1.5
@@ -104,6 +104,8 @@
 	     (send-to-emacs `(:presentation-end ,id :repl-result))
 	     (send-to-emacs `(:write-string ,(string #\Newline) 
 					    :repl-result)))))
+    (fresh-line)
+    (finish-output)
     (if (null values)
         (send-to-emacs `(:write-string "; No value" :repl-result))
         (mapc #'send values))))