summaryrefslogtreecommitdiff
path: root/lisp/mail/rmailmm.el
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2019-06-14 13:30:13 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2019-06-14 14:05:30 +0200
commita983bf0c4997c59f813e90be17537548909a1052 (patch)
tree0bb139350c9a1ba79a88e7d68e5bd62eabba48d1 /lisp/mail/rmailmm.el
parent7486b8f4eb81d80be2e7bc772fc34c6174a4d44d (diff)
downloademacs-a983bf0c4997c59f813e90be17537548909a1052.tar.gz
Fix compilation warning in rmailmm
* lisp/mail/rmailmm.el (rmail-mime-insert-bulk): Remove apparently superfluous call to string-as-unibyte -- the buffer should be unibyte already at this point.
Diffstat (limited to 'lisp/mail/rmailmm.el')
-rw-r--r--lisp/mail/rmailmm.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/mail/rmailmm.el b/lisp/mail/rmailmm.el
index af528135ccb..95977e826d7 100644
--- a/lisp/mail/rmailmm.el
+++ b/lisp/mail/rmailmm.el
@@ -836,7 +836,8 @@ directly."
size (car bulk-data))
(if (stringp (aref body 0))
(setq data (aref body 0))
- (setq data (string-as-unibyte (buffer-string)))
+ (setq data (buffer-string))
+ (cl-assert (not (multibyte-string-p data)))
(aset body 0 data)
(rmail-mime-set-bulk-data entity)
(delete-region (point-min) (point-max)))