(compilation-start): Always set compilation-last-buffer and return it.

043442b4 · Kim F. Storm · 3f2c97ea · 043442b4
Commit 043442b4 authored Mar 19, 2004 by Kim F. Storm
Hide whitespace changes
Inline Side-by-side

Showing with 3 additions and 3 deletions

lisp/progmodes/compile.el lisp/progmodes/compile.el +3 -3

No files found.
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -927,9 +927,9 @@ exited abnormally with code %d\n"
    (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'."