From: Masatake YAMATO <jet@gyve.org>
Date: Wed, 31 May 2006 07:21:10 +0000 (+0000)
Subject: (compilation-error-regexp-alist-alist::gcov-called-line):
X-Git-Tag: emacs-pretest-22.0.90~2168
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=206e215ecd2d836cf105007bbeb330c7b36980ec;p=emacs.git

(compilation-error-regexp-alist-alist::gcov-called-line):
Don't put face on `-' lines in gcov file. Suggested by Dan Nicolaescu.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 1b36d520c64..31bb11e76cc 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2006-05-31  Masatake YAMATO  <jet@gyve.org>
+
+	* progmodes/compile.el (compilation-error-regexp-alist-alist::gcov-called-line): 
+	Don't put face on `-' lines in gcov file.
+	Suggested by Dan Nicolaescu.
+
 2006-05-31  Nick Roberts  <nickrob@snap.net.nz>
 
 	* progmodes/gud.el (gud-query-cmdline, gud-common-init): Revert
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index 799f108146f..1649a2533ba 100644
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -300,7 +300,7 @@ File = \\(.+\\), Line = \\([0-9]+\\)\\(?:, Column = \\([0-9]+\\)\\)?"
      "^ +\\(#####\\): +\\([0-9]+\\):.+$" nil 2 nil 2 nil
      (1 compilation-error-face))
     (gcov-called-line
-     "^ +[-0-9]+: +\\([1-9]\\|[0-9]\\{2,\\}\\):.*$" nil 1 nil 0)
+     "^ *[0-9]+: +\\([1-9]\\|[0-9]\\{2,\\}\\):.*$" nil 1 nil 0)
 )
   "Alist of values for `compilation-error-regexp-alist'.")