diff options
author | Gerd Moellmann <[email protected]> | 1999-11-18 15:57:55 +0000 |
---|---|---|
committer | Gerd Moellmann <[email protected]> | 1999-11-18 15:57:55 +0000 |
commit | 9dd1cf67c27706972c9b2317729a11c92aa77ca1 (patch) | |
tree | 9838ad0668aec0822c0999884af3ab39ce02b16e /lisp | |
parent | 71447e8f88f9a6a985f17754a7cb0f515d1590b1 (diff) |
(compilation-parse-errors): Use
compilation-buffer-p instead of testing major-mode.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/ChangeLog | 5 | ||||
-rw-r--r-- | lisp/progmodes/compile.el | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 6302fe40b9..0b9cd6a826 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +1999-11-18 Gerd Moellmann <[email protected]> + + * progmodes/compile.el (compilation-parse-errors): Use + compilation-buffer-p instead of testing major-mode. + 1999-11-18 Richard M. Stallman <[email protected]> * mail/rmailedit.el (rmail-cease-edit): Run rmail-mode-hook. diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el index efe7851b18..dca54808e1 100644 --- a/lisp/progmodes/compile.el +++ b/lisp/progmodes/compile.el @@ -1773,7 +1773,7 @@ See variable `compilation-parse-errors-function' for the interface it uses." ;; Don't reparse messages already seen at last parse. (goto-char compilation-parsing-end) (when (and (bobp) - (eq major-mode 'compilation-mode)) + (compilation-buffer-p (current-buffer))) (setq compilation-current-file nil) ; No current file at start. ;; Don't parse the first two lines as error messages. ;; This matters for grep. |