From 06364e6463b654038ca3290fec6a37d1ca69700c Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Sun, 6 Jan 2013 17:23:26 -0800 Subject: [PATCH] * lisp/progmodes/compile.el (compilation-parse-errors): Fix typo. Fixes: debbugs:13369 --- lisp/ChangeLog | 5 +++++ lisp/progmodes/compile.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 54ce07b1fb2..1d045425720 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2013-01-07 Glenn Morris + + * progmodes/compile.el (compilation-parse-errors): + Fix typo. (Bug#13369) + 2013-01-07 Vitalie Spinu (tiny change) * comint.el (comint-send-input): Check size of buffer before diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el index 9fffeaaabe2..f383e02bc7f 100644 --- a/lisp/progmodes/compile.el +++ b/lisp/progmodes/compile.el @@ -1280,7 +1280,7 @@ to `compilation-error-regexp-alist' if RULES is nil." ;; whether or not omake's own error messages are recognized. (cond ((not (memq 'omake compilation-error-regexp-alist)) nil) - ((string-match "\\`\\([^^]\\|^\\( \\*\\|\\[\\)\\)" pat) + ((string-match "\\`\\([^^]\\|\\^\\( \\*\\|\\[\\)\\)" pat) nil) ;; Not anchored or anchored but already allows empty spaces. (t (setq pat (concat "^ *" (substring pat 1))))) -- 2.39.2