aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorRoland McGrath1996-03-14 15:32:38 +0000
committerRoland McGrath1996-03-14 15:32:38 +0000
commit95d219b53e0840982ab55df5f1ee875de7bb3ca2 (patch)
treebd0be4d06c9584aa4f8a50f27f900a3b389d1c27 /lisp
parentf694e5d2715efbef6009b2e677a7614dcae39f1c (diff)
downloademacs-95d219b53e0840982ab55df5f1ee875de7bb3ca2.tar.gz
emacs-95d219b53e0840982ab55df5f1ee875de7bb3ca2.zip
(compilation-find-buffer): Only choose compilation-last-buffer if it is
compilation-buffer-p.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/progmodes/compile.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index 13aad9173ae..552bff20c99 100644
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -913,6 +913,7 @@ other kinds of prefix arguments are ignored."
913 ;; The current buffer is a compilation buffer. 913 ;; The current buffer is a compilation buffer.
914 (current-buffer) 914 (current-buffer)
915 (if (and compilation-last-buffer (buffer-name compilation-last-buffer) 915 (if (and compilation-last-buffer (buffer-name compilation-last-buffer)
916 (compilation-buffer-p compilation-last-buffer)
916 (or (not other-buffer) (not (eq compilation-last-buffer 917 (or (not other-buffer) (not (eq compilation-last-buffer
917 (current-buffer))))) 918 (current-buffer)))))
918 compilation-last-buffer 919 compilation-last-buffer