diff options
| -rw-r--r-- | lisp/progmodes/compile.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el index 884e93d0aa5..dd7eccfc208 100644 --- a/lisp/progmodes/compile.el +++ b/lisp/progmodes/compile.el | |||
| @@ -1000,7 +1000,8 @@ The current buffer should be the desired compilation output buffer." | |||
| 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 |