projects
/
gnus
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
* mml.el (mml-generate-mime-1): Use mm-string-as-unibyte instead of
[gnus]
/
lisp
/
mml.el
diff --git
a/lisp/mml.el
b/lisp/mml.el
index
c17f1f8
..
fc19974
100644
(file)
--- a/
lisp/mml.el
+++ b/
lisp/mml.el
@@
-505,9
+505,9
@@
If MML is non-nil, return the buffer up till the correspondent mml tag."
(mm-with-unibyte-buffer
(cond
((cdr (assq 'buffer cont))
(mm-with-unibyte-buffer
(cond
((cdr (assq 'buffer cont))
- (insert (
with-current-buffer (cdr (assq 'buffer cont))
- (mm-with-unibyte-current-buffer
-
(buffer-string)))))
+ (insert (
mm-string-as-unibyte
+ (with-current-buffer (cdr (assq 'buffer cont))
+ (buffer-string)))))
((and filename
(not (equal (cdr (assq 'nofile cont)) "yes")))
(let ((coding-system-for-read mm-binary-coding-system))
((and filename
(not (equal (cdr (assq 'nofile cont)) "yes")))
(let ((coding-system-for-read mm-binary-coding-system))