diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2015-09-12 00:30:02 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2015-09-12 00:30:02 -0400 |
| commit | 166812addb0a1b9b2258ef3ce76424cd7facfa8b (patch) | |
| tree | 9ed1838de7761bf24b94d2182e66a6a696d5baf2 /lisp/ibuffer.el | |
| parent | e125dce50b2fa1c5f57f6ca00ea679437593bdc4 (diff) | |
| download | emacs-166812addb0a1b9b2258ef3ce76424cd7facfa8b.tar.gz emacs-166812addb0a1b9b2258ef3ce76424cd7facfa8b.tar.bz2 emacs-166812addb0a1b9b2258ef3ce76424cd7facfa8b.zip | |
Bind inhibit-modification-hooks rather than a/b-c-f
* lisp/wid-edit.el (widget-editable-list-insert-before)
(widget-editable-list-delete-at):
* lisp/progmodes/cperl-mode.el (cperl-find-pods-heres)
(cperl-font-lock-unfontify-region-function):
* lisp/progmodes/antlr-mode.el (save-buffer-state-x):
* lisp/obsolete/longlines.el (longlines-mode):
* lisp/obsolete/fast-lock.el (save-buffer-state):
* lisp/mouse.el (mouse-save-then-kill-delete-region):
* lisp/gnus/message.el (message-hide-headers):
* lisp/eshell/esh-mode.el (eshell-send-input, eshell-output-filter):
* lisp/ibuffer.el (ibuffer-update-title-and-summary)
(ibuffer-redisplay-engine): Bind inhibit-modification-hooks to t rather
than after/before-change-functions to nil.
Diffstat (limited to 'lisp/ibuffer.el')
| -rw-r--r-- | lisp/ibuffer.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/ibuffer.el b/lisp/ibuffer.el index 718471b7993..dc34a63aba9 100644 --- a/lisp/ibuffer.el +++ b/lisp/ibuffer.el @@ -2037,7 +2037,7 @@ the value of point at the beginning of the line for that buffer." (defun ibuffer-update-title-and-summary (format) (ibuffer-assert-ibuffer-mode) ;; Don't do funky font-lock stuff here - (let ((after-change-functions nil)) + (let ((inhibit-modification-hooks t)) (if (get-text-property (point-min) 'ibuffer-title) (delete-region (point-min) (next-single-property-change @@ -2244,7 +2244,7 @@ If optional arg SILENT is non-nil, do not display progress messages." (orig (count-lines (point-min) (point))) ;; Inhibit font-lock caching tricks, since we're modifying the ;; entire buffer at once - (after-change-functions nil) + (inhibit-modification-hooks t) (ext-loaded (featurep 'ibuf-ext)) (bgroups (if ext-loaded (ibuffer-generate-filter-groups bmarklist) |