diff options
author | Ivan Shmakov <ivan@siamics.net> | 2015-01-17 19:07:07 +0000 |
---|---|---|
committer | Ivan Shmakov <ivan@siamics.net> | 2015-01-17 19:34:50 +0000 |
commit | 172854461531ac7ad11b4490adc148e7a42a9fb3 (patch) | |
tree | bd7128b54319df9ba38af23063291b99946280ea /lisp/textmodes/enriched.el | |
parent | e000ff30b4354064ca7f9ed07e58903d7c44033f (diff) | |
download | emacs-172854461531ac7ad11b4490adc148e7a42a9fb3.tar.gz |
Fix: inhibit point motion hooks when encoding an enriched document.
* lisp/textmodes/enriched.el (enriched-encode): Use
inhibit-point-motion-hooks in addition to inhibit-read-only.
Fixes: debbugs:18246
Diffstat (limited to 'lisp/textmodes/enriched.el')
-rw-r--r-- | lisp/textmodes/enriched.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/textmodes/enriched.el b/lisp/textmodes/enriched.el index b9d45b3a32f..040a50e3099 100644 --- a/lisp/textmodes/enriched.el +++ b/lisp/textmodes/enriched.el @@ -314,7 +314,8 @@ the region, and the START and END of each region." ;;;###autoload (defun enriched-encode (from to orig-buf) (if enriched-verbose (message "Enriched: encoding document...")) - (let ((inhibit-read-only t)) + (let ((inhibit-read-only t) + (inhibit-point-motion-hooks t)) (save-restriction (narrow-to-region from to) (delete-to-left-margin) |