message.el (message-hide-headers): Bind inhibit-modification-hooks to t rather than...

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 41d390b..f1f40a6 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2015-09-12  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * message.el (message-hide-headers): Bind inhibit-modification-hooks to
+       t rather than after-change-functions to nil.
+
 2015-09-09  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * time-date.el (time-to-seconds, time-less-p):

diff --git a/lisp/message.el b/lisp/message.el
index 435834c..aeab291 100644 (file)
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -8374,7 +8374,7 @@ From headers in the original article."
                     (list message-hidden-headers)
                   message-hidden-headers))
        (inhibit-point-motion-hooks t)
-       (after-change-functions nil)
+       (inhibit-modification-hooks t)
        (end-of-headers (point-min)))
     (when regexps
       (save-excursion