[slime-cvs] CVS slime

trittweiler trittweiler at common-lisp.net
Fri Aug 15 22:59:10 UTC 2008


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

Modified Files:
	slime.el ChangeLog 
Log Message:


* slime.el (slime-popup-buffer-quit): Fix regression; we have to
  invoke `bury-buffer' without an argument to make it switch buffers
  for us (for the case when the snapshot wasn't restored.)


--- /project/slime/cvsroot/slime/slime.el	2008/08/15 20:48:54	1.997
+++ /project/slime/cvsroot/slime/slime.el	2008/08/15 22:59:09	1.998
@@ -1046,9 +1046,10 @@
     (when (slime-popup-buffer-snapshot-unchanged-p)
       (slime-popup-buffer-restore-snapshot))
     (setq slime-popup-buffer-saved-emacs-snapshot nil)
-    (if kill-buffer-p
-        (kill-buffer popup-buffer)
-        (bury-buffer popup-buffer))))
+    (with-current-buffer popup-buffer
+      ;; This will switch to another buffer if snapshot wasn't restored.
+      (bury-buffer)
+      (when kill-buffer-p (kill-buffer)))))
 
 (defun slime-popup-buffer-snapshot-unchanged-p ()
   (equalp (slime-current-emacs-snapshot-fingerprint)
--- /project/slime/cvsroot/slime/ChangeLog	2008/08/15 20:48:54	1.1455
+++ /project/slime/cvsroot/slime/ChangeLog	2008/08/15 22:59:10	1.1456
@@ -1,5 +1,11 @@
 2008-08-15  Tobias C. Rittweiler  <tcr at freebits.de>
 
+	* slime.el (slime-popup-buffer-quit): Fix regression; we have to
+	invoke `bury-buffer' without an argument to make it switch buffers
+	for us (for the case when the snapshot wasn't restored.)
+
+2008-08-15  Tobias C. Rittweiler  <tcr at freebits.de>
+
 	* slime.el (slime-list-compiler-notes): Only shrink if notes tree
 	isn't displayed as being collapsed.
 




More information about the slime-cvs mailing list