[slime-cvs] CVS slime
mkoeppe
mkoeppe at common-lisp.net
Tue Mar 28 20:12:07 UTC 2006
Update of /project/slime/cvsroot/slime
In directory clnet:/tmp/cvs-serv30641
Modified Files:
slime.el
Log Message:
(slime-recently-visited-buffer): Ignore internal buffers (starting
with a space), to avoid selecting the *slime-fontify* buffer.
Reported by Andreas Fuchs.
--- /project/slime/cvsroot/slime/slime.el 2006/03/28 20:05:16 1.610
+++ /project/slime/cvsroot/slime/slime.el 2006/03/28 20:12:06 1.611
@@ -8966,6 +8966,7 @@
Only considers buffers that are not already visible."
(loop for buffer in (buffer-list)
when (and (with-current-buffer buffer (eq major-mode mode))
+ (not (string-match "^ " (buffer-name buffer)))
(null (get-buffer-window buffer 'visible)))
return buffer
finally (error "Can't find unshown buffer in %S" mode)))
More information about the slime-cvs
mailing list