From: Kim F. Storm <storm@cua.dk>
Date: Fri, 19 Mar 2004 00:21:43 +0000 (+0000)
Subject: (compilation-start): Always set compilation-last-buffer and return it.
X-Git-Tag: ttn-vms-21-2-B4~7220
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=043442b4f334fb29aa0a9085b5cf915ab0433bd7;p=emacs.git

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

diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index 8b820d07472..34611d3aa37 100644
--- 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'."