aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRoland McGrath1993-07-15 03:08:17 +0000
committerRoland McGrath1993-07-15 03:08:17 +0000
commit2e4301efa598474b666ef790973019c7e7dafcc9 (patch)
treec83b6796c203b6cacc529715cde2c6187e779298
parenta223b10d5e64e6a358a486407946571892f560b8 (diff)
downloademacs-2e4301efa598474b666ef790973019c7e7dafcc9.tar.gz
emacs-2e4301efa598474b666ef790973019c7e7dafcc9.zip
(compilation-parse-errors): After skipping two lines, move one char back so
point before the newline.
-rw-r--r--lisp/progmodes/compile.el7
1 files changed, 6 insertions, 1 deletions
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index 88daa725119..e13bec9f2df 100644
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -917,7 +917,12 @@ See variable `compilation-parse-errors-function' for the interface it uses."
917 ;; Don't parse the first two lines as error messages. 917 ;; Don't parse the first two lines as error messages.
918 ;; This matters for grep. 918 ;; This matters for grep.
919 (if (bobp) 919 (if (bobp)
920 (forward-line 2)) 920 (progn
921 (forward-line 2)
922 ;; Move back so point is before the newline.
923 ;; This matters because some error regexps use \n instead of ^
924 ;; to be faster.
925 (forward-char -1)))
921 926
922 ;; Compile all the regexps we want to search for into one. 927 ;; Compile all the regexps we want to search for into one.
923 (setq regexp (concat "\\(" compilation-enter-directory-regexp "\\)\\|" 928 (setq regexp (concat "\\(" compilation-enter-directory-regexp "\\)\\|"