diff options
| author | Daiki Ueno | 2011-08-28 22:04:32 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka | 2011-08-28 22:04:32 +0000 |
| commit | 0f3de88f02fd5107b34dd653668099a7d8b3e7bb (patch) | |
| tree | bae095c8081ef064e6a3358680a3faac9fc93a01 | |
| parent | fb87e0fb94a5ec2018c677a91c62eebea5a978eb (diff) | |
| download | emacs-0f3de88f02fd5107b34dd653668099a7d8b3e7bb.tar.gz emacs-0f3de88f02fd5107b34dd653668099a7d8b3e7bb.zip | |
Merge changes made in Gnus trunk.
mml-smime.el (mml-smime-epg-verify): Don't use the 4th arg of mm-replace-in-string for compatibility issues.
mml2015.el (mml2015-epg-verify): Ditto.
| -rw-r--r-- | lisp/gnus/ChangeLog | 6 | ||||
| -rw-r--r-- | lisp/gnus/mml-smime.el | 2 | ||||
| -rw-r--r-- | lisp/gnus/mml2015.el | 2 |
3 files changed, 8 insertions, 2 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 5c8b4333332..feee3c49f3a 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog | |||
| @@ -1,3 +1,9 @@ | |||
| 1 | 2011-08-27 Daiki Ueno <ueno@unixuser.org> | ||
| 2 | |||
| 3 | * mml-smime.el (mml-smime-epg-verify): Don't use the 4th arg of | ||
| 4 | mm-replace-in-string for compatibility issues. | ||
| 5 | * mml2015.el (mml2015-epg-verify): Ditto. | ||
| 6 | |||
| 1 | 2011-08-26 Katsumi Yamaoka <yamaoka@jpl.org> | 7 | 2011-08-26 Katsumi Yamaoka <yamaoka@jpl.org> |
| 2 | 8 | ||
| 3 | * mailcap.el (mailcap-mime-data): Regexp-quote MIME subtype. | 9 | * mailcap.el (mailcap-mime-data): Regexp-quote MIME subtype. |
diff --git a/lisp/gnus/mml-smime.el b/lisp/gnus/mml-smime.el index 43c91604ec5..7a7b3f6d82d 100644 --- a/lisp/gnus/mml-smime.el +++ b/lisp/gnus/mml-smime.el | |||
| @@ -531,7 +531,7 @@ Content-Disposition: attachment; filename=smime.p7m | |||
| 531 | (mm-set-handle-multipart-parameter | 531 | (mm-set-handle-multipart-parameter |
| 532 | mm-security-handle 'gnus-info "Corrupted") | 532 | mm-security-handle 'gnus-info "Corrupted") |
| 533 | (throw 'error handle)) | 533 | (throw 'error handle)) |
| 534 | (setq part (mm-replace-in-string part "\n" "\r\n" t) | 534 | (setq part (mm-replace-in-string part "\n" "\r\n") |
| 535 | context (epg-make-context 'CMS)) | 535 | context (epg-make-context 'CMS)) |
| 536 | (condition-case error | 536 | (condition-case error |
| 537 | (setq plain (epg-verify-string context (mm-get-part signature) part)) | 537 | (setq plain (epg-verify-string context (mm-get-part signature) part)) |
diff --git a/lisp/gnus/mml2015.el b/lisp/gnus/mml2015.el index 7d8a4119c0e..b9310beed58 100644 --- a/lisp/gnus/mml2015.el +++ b/lisp/gnus/mml2015.el | |||
| @@ -923,7 +923,7 @@ If set, it overrides the setting of `mml2015-sign-with-sender'." | |||
| 923 | (mm-set-handle-multipart-parameter | 923 | (mm-set-handle-multipart-parameter |
| 924 | mm-security-handle 'gnus-info "Corrupted") | 924 | mm-security-handle 'gnus-info "Corrupted") |
| 925 | (throw 'error handle)) | 925 | (throw 'error handle)) |
| 926 | (setq part (mm-replace-in-string part "\n" "\r\n" t) | 926 | (setq part (mm-replace-in-string part "\n" "\r\n") |
| 927 | signature (mm-get-part signature) | 927 | signature (mm-get-part signature) |
| 928 | context (epg-make-context)) | 928 | context (epg-make-context)) |
| 929 | (condition-case error | 929 | (condition-case error |