# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 942940458 0
# Node ID bfcbc828fdbcfacd764311f09a052547340e8fcf
# Parent  7c51cdc36b3a92ac151ce4031a247a7eac1b3553
(compilation-parse-errors): Use
compilation-buffer-p instead of testing major-mode.

diff -r 7c51cdc36b3a -r bfcbc828fdbc lisp/progmodes/compile.el
--- a/lisp/progmodes/compile.el	Thu Nov 18 13:34:19 1999 +0000
+++ b/lisp/progmodes/compile.el	Thu Nov 18 15:54:18 1999 +0000
@@ -1773,7 +1773,7 @@
     ;; 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.