diff lisp/progmodes/compile.el @ 4093:d24725412d47

(compilation-parse-errors): After skipping two lines, move one char back so point before the newline.
author Roland McGrath <roland@gnu.org>
date Thu, 15 Jul 1993 03:08:17 +0000
parents a37868b332ac
children 787df5416fba
line wrap: on
line diff
--- a/lisp/progmodes/compile.el	Thu Jul 15 01:55:13 1993 +0000
+++ b/lisp/progmodes/compile.el	Thu Jul 15 03:08:17 1993 +0000
@@ -917,7 +917,12 @@
     ;; Don't parse the first two lines as error messages.
     ;; This matters for grep.
     (if (bobp)
-	(forward-line 2))
+	(progn
+	  (forward-line 2)
+	  ;; Move back so point is before the newline.
+	  ;; This matters because some error regexps use \n instead of ^
+	  ;; to be faster.
+	  (forward-char -1)))
 
     ;; Compile all the regexps we want to search for into one.
     (setq regexp (concat "\\(" compilation-enter-directory-regexp "\\)\\|"