Mercurial > emacs
changeset 48844:63bc288cd2ae
(compile-reinitialize-errors): Don't mark the buffer as modified unless it
really is.
author | Juanma Barranquero <lekktu@gmail.com> |
---|---|
date | Sat, 14 Dec 2002 23:30:36 +0000 |
parents | d39927a676f3 |
children | a1bf73b831bc |
files | lisp/progmodes/compile.el |
diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/compile.el Sat Dec 14 14:27:23 2002 +0000 +++ b/lisp/progmodes/compile.el Sat Dec 14 23:30:36 2002 +0000 @@ -1564,6 +1564,7 @@ (let ((inhibit-read-only t) (buffer-undo-list t) deactivate-mark + (buffer-was-modified (buffer-modified-p)) (error-list compilation-error-list)) (while error-list (save-excursion @@ -1571,7 +1572,8 @@ (progn (end-of-line) (point)) '(mouse-face highlight help-echo "\ mouse-2: visit this file and line"))) - (setq error-list (cdr error-list)))) + (setq error-list (cdr error-list))) + (set-buffer-modified-p buffer-was-modified)) ))))) (defun compile-mouse-goto-error (event)