diff options
author | James Thomas <jimjoe@gmx.net> | 2022-04-03 14:14:24 +0200 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2022-04-03 14:14:24 +0200 |
commit | 9f521db6fec6c6dbdfeb1145f4dbb603c0240299 (patch) | |
tree | da1c319fa024366496c5391917f4a7d22d61b622 /lisp/gnus/gnus-msg.el | |
parent | 5e429e21d9ae7e217c4c2b5b6d78f932c8f6ae39 (diff) | |
download | emacs-9f521db6fec6c6dbdfeb1145f4dbb603c0240299.tar.gz |
Ensure re-encoding after change in gnus-inews-do-gcc
* lisp/gnus/gnus-msg.el (gnus-inews-do-gcc): Re-encode the message
body if it has been modified by gnus-gcc-pre-body-encode-hook
(bug#54687).
Diffstat (limited to 'lisp/gnus/gnus-msg.el')
-rw-r--r-- | lisp/gnus/gnus-msg.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/gnus/gnus-msg.el b/lisp/gnus/gnus-msg.el index f38f6f4ee2b..f6ae028a104 100644 --- a/lisp/gnus/gnus-msg.el +++ b/lisp/gnus/gnus-msg.el @@ -1593,9 +1593,10 @@ this is a reply." (nnheader-set-temp-buffer " *acc*") (setq message-options (with-current-buffer cur message-options)) (insert-buffer-substring cur) + (restore-buffer-modified-p nil) (run-hooks 'gnus-gcc-pre-body-encode-hook) ;; Avoid re-doing things like GPG-encoding secret parts. - (if (not encoded-cache) + (if (or (buffer-modified-p) (not encoded-cache)) (message-encode-message-body) (erase-buffer) (insert encoded-cache)) |