[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs/lisp ChangeLog jit-lock.el
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] emacs/lisp ChangeLog jit-lock.el |
Date: |
Sat, 14 Feb 2009 21:41:28 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Stefan Monnier <monnier> 09/02/14 21:41:28
Modified files:
lisp : ChangeLog jit-lock.el
Log message:
(with-buffer-prepared-for-jit-lock): Swap the `let' and
the `with-buffer-unmodified' to avoid useless `readlink' calls.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.15331&r2=1.15332
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/jit-lock.el?cvsroot=emacs&r1=1.66&r2=1.67
Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.15331
retrieving revision 1.15332
diff -u -b -r1.15331 -r1.15332
--- ChangeLog 14 Feb 2009 16:58:04 -0000 1.15331
+++ ChangeLog 14 Feb 2009 21:41:26 -0000 1.15332
@@ -1,3 +1,8 @@
+2009-02-14 Stefan Monnier <address@hidden>
+
+ * jit-lock.el (with-buffer-prepared-for-jit-lock): Swap the `let' and
+ the `with-buffer-unmodified' to avoid useless `readlink' calls.
+
2009-02-14 Roland Winkler <address@hidden>
* textmodes/bibtex.el (bibtex-global-key-alist)
@@ -18,8 +23,8 @@
around forms that refer to translation-table-for-input.
* international/quail.el (quail-input-string-to-events)
- (quail-store-decode-map-key, quail-char-equal-p): Use
- `with-no-warnings' around forms that refer to
+ (quail-store-decode-map-key, quail-char-equal-p):
+ Use `with-no-warnings' around forms that refer to
translation-table-for-input.
* simple.el (quoted-insert, zap-to-char): Use `with-no-warnings'
Index: jit-lock.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/jit-lock.el,v
retrieving revision 1.66
retrieving revision 1.67
diff -u -b -r1.66 -r1.67
--- jit-lock.el 5 Jan 2009 03:19:27 -0000 1.66
+++ jit-lock.el 14 Feb 2009 21:41:28 -0000 1.67
@@ -45,14 +45,16 @@
"Execute BODY in current buffer, overriding several variables.
Preserves the `buffer-modified-p' state of the current buffer."
(declare (debug t))
- `(with-buffer-unmodified
- (let ((buffer-undo-list t)
+ `(let ((buffer-undo-list t)
(inhibit-read-only t)
(inhibit-point-motion-hooks t)
(inhibit-modification-hooks t)
deactivate-mark
buffer-file-name
buffer-file-truename)
+ ;; Do reset the modification status from within the let, since
+ ;; otherwise set-buffer-modified-p may try to unlock the file.
+ (with-buffer-unmodified
,@body))))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs/lisp ChangeLog jit-lock.el,
Stefan Monnier <=