Mercurial > emacs
comparison lisp/progmodes/compile.el @ 10092:b53266f04fd9
(compilation-next-error-locus): Parsed column numbers are 1-origin.
author | Roland McGrath <roland@gnu.org> |
---|---|
date | Wed, 30 Nov 1994 19:37:48 +0000 |
parents | 9d7972f4657c |
children | f404f4123318 |
comparison
equal
deleted
inserted
replaced
10091:f444ea4046e9 | 10092:b53266f04fd9 |
---|---|
998 (save-excursion | 998 (save-excursion |
999 (save-restriction | 999 (save-restriction |
1000 (widen) | 1000 (widen) |
1001 (goto-line last-line) | 1001 (goto-line last-line) |
1002 (if column | 1002 (if column |
1003 (move-to-column column) | 1003 ;; Columns in error msgs are 1-origin. |
1004 (move-to-column (1- column)) | |
1004 (beginning-of-line)) | 1005 (beginning-of-line)) |
1005 (setcdr next-error (point-marker)) | 1006 (setcdr next-error (point-marker)) |
1006 ;; Make all the other error messages referring | 1007 ;; Make all the other error messages referring |
1007 ;; to the same file have markers into the buffer. | 1008 ;; to the same file have markers into the buffer. |
1008 (while errors | 1009 (while errors |