Mercurial > emacs
changeset 28533:e564d806233e
(with-buffer-unmodified): Fix bug introduced by `)'
at the wrong place.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Mon, 10 Apr 2000 10:50:57 +0000 |
parents | 1c30dbc6c0d6 |
children | a25e11b83399 |
files | lisp/jit-lock.el |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/jit-lock.el Mon Apr 10 01:52:28 2000 +0000 +++ b/lisp/jit-lock.el Mon Apr 10 10:50:57 2000 +0000 @@ -38,8 +38,8 @@ (let ((modified (make-symbol "modified"))) `(let ((,modified (buffer-modified-p))) ,@body - (unless ,modified) - (restore-buffer-modified-p nil)))) + (unless ,modified + (restore-buffer-modified-p nil))))) (defmacro with-buffer-prepared-for-font-lock (&rest body) "Execute BODY in current buffer, overriding several variables.