Mercurial > emacs
diff lisp/progmodes/compile.el @ 56154:0faa9af73cb1
(compilation-error-properties): Store one more than end-col, if present, so
that transient-mark-mode will highlight last char too.
| author | Daniel Pfeiffer <occitan@esperanto.org> |
|---|---|
| date | Fri, 18 Jun 2004 23:00:46 +0000 |
| parents | c6610cef9b75 |
| children | fb266772e0e7 4c90ffeb71c5 |
line wrap: on
line diff
--- a/lisp/progmodes/compile.el Fri Jun 18 22:59:05 2004 +0000 +++ b/lisp/progmodes/compile.el Fri Jun 18 23:00:46 2004 +0000 @@ -583,7 +583,7 @@ (setq col (match-string-no-properties col)) (setq col (- (string-to-number col) compilation-first-column))) (if (and end-col (setq end-col (match-string-no-properties end-col))) - (setq end-col (- (string-to-number end-col) compilation-first-column)) + (setq end-col (- (string-to-number end-col) compilation-first-column -1)) (if end-line (setq end-col -1))) (if (consp type) ; not a static type, check what it is. (setq type (or (and (car type) (match-end (car type)) 1)