[slime-cvs] CVS slime/contrib

[CVS User heller]

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

Modified Files:
	ChangeLog slime-repl.el 
Log Message:
* slime-repl.el (slime-repl-quit): Kill the repl buffer before
quitting.  Reported by Volkan YAZICI.

--- /project/slime/cvsroot/slime/contrib/ChangeLog	2008/12/27 13:21:43	1.151
+++ /project/slime/cvsroot/slime/contrib/ChangeLog	2008/12/27 13:21:47	1.152
@@ -1,5 +1,10 @@
 2008-12-27  Helmut Eller  <heller at common-lisp.net>
 
+	* slime-repl.el (slime-repl-quit): Kill the repl buffer before
+	quitting.  Reported by Volkan YAZICI.
+
+2008-12-27  Helmut Eller  <heller at common-lisp.net>
+
 	* slime-asdf.el: Require slime-repl.
 
 2008-12-26  Helmut Eller  <heller at common-lisp.net>
--- /project/slime/cvsroot/slime/contrib/slime-repl.el	2008/12/26 07:23:05	1.4
+++ /project/slime/cvsroot/slime/contrib/slime-repl.el	2008/12/27 13:21:47	1.5
@@ -1310,7 +1310,10 @@
   (:one-liner "Quit all Lisps and close all SLIME buffers."))
 
 (defslime-repl-shortcut slime-repl-quit ("quit")
-  (:handler 'slime-quit-lisp)
+  (:handler (lambda ()
+	      (interactive)
+	      (kill-buffer (slime-output-buffer))
+	      (slime-quit-lisp)))
   (:one-liner "Quit the current Lisp."))
 
 (defslime-repl-shortcut slime-repl-defparameter ("defparameter" "!")