[slime-cvs] CVS slime

[CVS User heller]

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

Modified Files:
	slime.el 
Log Message:
(slime-show-compilation-log): Set next-error-last-buffer.

--- /project/slime/cvsroot/slime/slime.el	2009/01/03 21:13:31	1.1093
+++ /project/slime/cvsroot/slime/slime.el	2009/01/03 21:13:37	1.1094
@@ -2894,7 +2894,8 @@
                                      1)
                           (slime-note.message note)))))
       (unless compilation-scroll-output 
-        (goto-char (point-min))))))
+        (goto-char (point-min)))
+      (setq next-error-last-buffer (current-buffer)))))
 
 (defun slime-compilation-loc (location)
   (cond ((slime-location-p location)