Rmail fix
* lisp/mail/rmail.el (rmail-epa-decrypt-1): Include the just-decrypted text as element 4 of the value. (rmail-epa-decrypt): Take the text to insert from that element.
This commit is contained in:
parent
96e18ebb99
commit
971f4fabfa
1 changed files with 3 additions and 2 deletions
|
@ -4590,7 +4590,8 @@ Argument MIME is non-nil if this is a mime message."
|
|||
(current-buffer))))
|
||||
|
||||
(list armor-start (- (point-max) after-end) mime
|
||||
armor-end-regexp)))
|
||||
armor-end-regexp
|
||||
(buffer-substring armor-start (- (point-max) after-end)))))
|
||||
|
||||
(declare-function rmail-mime-entity-truncated "rmailmm" (entity))
|
||||
|
||||
|
@ -4652,7 +4653,7 @@ Argument MIME is non-nil if this is a mime message."
|
|||
;; Found as expected -- now replace it with the decrypt.
|
||||
(when armor-end
|
||||
(delete-region armor-start armor-end)
|
||||
(insert-buffer-substring from-buffer (nth 0 d) (nth 1 d)))
|
||||
(insert (nth 4 d)))
|
||||
|
||||
;; Change the mime type (if this is in a mime part)
|
||||
;; so this part will display by default
|
||||
|
|
Loading…
Add table
Reference in a new issue