[slime-cvs] CVS slime

[CVS User heller]

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

Modified Files:
	ChangeLog slime.el 
Log Message:
Fix "wrong number of args" problem with slime-inspector-quit.
Reported by Anton Kovalenko.

* slime.el (slime-popup-buffer-quit-function)
(slime-quit-threads-buffer): Drop the kill-buffer-p argument.

--- /project/slime/cvsroot/slime/ChangeLog	2011/05/24 06:27:55	1.2194
+++ /project/slime/cvsroot/slime/ChangeLog	2011/05/27 07:45:44	1.2195
@@ -1,3 +1,11 @@
+2011-05-27  Helmut Eller  <heller at common-lisp.net>
+
+	Fix "wrong number of args" problem with slime-inspector-quit.
+	Reported by Anton Kovalenko.
+
+	* slime.el (slime-popup-buffer-quit-function)
+	(slime-quit-threads-buffer): Drop the kill-buffer-p argument.
+
 2011-05-24  Helmut Eller  <heller at common-lisp.net>
 
 	* slime.el (destructure-case): Fix "`_' not left unused" warnings.
--- /project/slime/cvsroot/slime/slime.el	2011/05/24 06:27:55	1.1369
+++ /project/slime/cvsroot/slime/slime.el	2011/05/27 07:45:44	1.1370
@@ -1004,10 +1004,10 @@
  (defvar slime-popup-buffer-quit-function 'slime-popup-buffer-quit
    "The function that is used to quit a temporary popup buffer."))
 
-(defun slime-popup-buffer-quit-function (&optional kill-buffer-p)
+(defun slime-popup-buffer-quit-function ()
   "Wrapper to invoke the value of `slime-popup-buffer-quit-function'."
   (interactive)
-  (funcall slime-popup-buffer-quit-function kill-buffer-p))
+  (funcall slime-popup-buffer-quit-function))
 
 ;; Interface
 (defun slime-popup-buffer-quit (&optional kill-buffer-p)
@@ -6154,7 +6154,7 @@
 
 (defvar slime-thread-index-to-id nil)
 
-(defun slime-quit-threads-buffer (&optional _)
+(defun slime-quit-threads-buffer ()
   (when slime-threads-buffer-timer
     (cancel-timer slime-threads-buffer-timer)
     (setq slime-threads-buffer-timer nil))