summaryrefslogtreecommitdiff
path: root/lisp/gnus/mml.el
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2016-02-14 14:42:26 +1100
committerLars Ingebrigtsen <larsi@gnus.org>2016-02-14 14:42:26 +1100
commitf3cdf9c23b79b242a6a313744686ed29cc16950b (patch)
treeccdd7c700f264b4017d82cfbd2bcabf2d8ad7f66 /lisp/gnus/mml.el
parent8f597e90f6c7b1f1cae0096f66a335df01b0e6f9 (diff)
downloademacs-f3cdf9c23b79b242a6a313744686ed29cc16950b.tar.gz
Remove compat code from some mml files
* lisp/gnus/mml-sec.el (mml-secure-passphrase-cache-expiry): Remove compat code. * lisp/gnus/mml-smime.el (mml-smime-openssl-sign-query): Always use `mail-extract-address-components', since this isn't time critical. (mml-smime-get-dns-cert): Ditto. * lisp/gnus/mml.el (mml-preview): Remove compat code.
Diffstat (limited to 'lisp/gnus/mml.el')
-rw-r--r--lisp/gnus/mml.el11
1 files changed, 5 insertions, 6 deletions
diff --git a/lisp/gnus/mml.el b/lisp/gnus/mml.el
index ce152acf145..d9cf15f4970 100644
--- a/lisp/gnus/mml.el
+++ b/lisp/gnus/mml.el
@@ -1544,12 +1544,11 @@ or the `pop-to-buffer' function."
(message-sort-headers)
(mml-to-mime))
(if raw
- (when (fboundp 'set-buffer-multibyte)
- (let ((s (buffer-string)))
- ;; Insert the content into unibyte buffer.
- (erase-buffer)
- (mm-disable-multibyte)
- (insert s)))
+ (let ((s (buffer-string)))
+ ;; Insert the content into unibyte buffer.
+ (erase-buffer)
+ (mm-disable-multibyte)
+ (insert s))
(let ((gnus-newsgroup-charset (car message-posting-charset))
gnus-article-prepare-hook gnus-original-article-buffer
gnus-displaying-mime)