changeset 54424:6ea174960a93

(compilation-start): Always set compilation-last-buffer and return it.
author Kim F. Storm <storm@cua.dk>
date Fri, 19 Mar 2004 00:21:43 +0000
parents 802a91a2e43a
children 3e1b0bccd22e
files lisp/progmodes/compile.el
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/compile.el	Thu Mar 18 20:26:01 2004 +0000
+++ b/lisp/progmodes/compile.el	Fri Mar 19 00:21:43 2004 +0000
@@ -927,9 +927,9 @@
     (if (buffer-local-value 'compilation-scroll-output outbuf)
 	(save-selected-window
 	  (select-window outwin)
-	  (goto-char (point-max)))
-      ;; Make it so the next C-x ` will use this buffer.
-      (setq compilation-last-buffer outbuf))))
+	  (goto-char (point-max))))
+    ;; Make it so the next C-x ` will use this buffer.
+    (setq compilation-last-buffer outbuf)))
 
 (defun compilation-set-window-height (window)
   "Set the height of WINDOW according to `compilation-window-height'."