diff options
author | ShengHuo ZHU <zsh@cs.rochester.edu> | 2001-11-07 11:48:22 +0000 |
---|---|---|
committer | ShengHuo ZHU <zsh@cs.rochester.edu> | 2001-11-07 11:48:22 +0000 |
commit | c23035e6d350163d096b45ce17221d034608c8c4 (patch) | |
tree | 83b82d3e8578b59eea1138b5dceec22df7ff70e2 /lisp/gnus | |
parent | 830ddd77805d1f992c7c1342237dd57341be495c (diff) | |
download | emacs-c23035e6d350163d096b45ce17221d034608c8c4.tar.gz |
2001-11-07 ShengHuo ZHU <zsh@cs.rochester.edu>
* mml.el (mml-preview): Bind mail-header-separator.
Diffstat (limited to 'lisp/gnus')
-rw-r--r-- | lisp/gnus/ChangeLog | 4 | ||||
-rw-r--r-- | lisp/gnus/mml.el | 3 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 1bdb9103b46..866e7782ca7 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,7 @@ +2001-11-07 ShengHuo ZHU <zsh@cs.rochester.edu> + + * mml.el (mml-preview): Bind mail-header-separator. + 2001-11-05 ShengHuo ZHU <zsh@cs.rochester.edu> * mml.el (mml-generate-mime-1): Use mm-with-unibyte-current-buffer. diff --git a/lisp/gnus/mml.el b/lisp/gnus/mml.el index b3061239e6d..d2beef9fa50 100644 --- a/lisp/gnus/mml.el +++ b/lisp/gnus/mml.el @@ -841,7 +841,8 @@ If RAW, don't highlight the article." (if (re-search-forward (concat "^" (regexp-quote mail-header-separator) "\n") nil t) (replace-match "\n")) - (mml-to-mime) + (let ((mail-header-separator "")) ;; mail-header-separator is removed. + (mml-to-mime)) (if raw (when (fboundp 'set-buffer-multibyte) (let ((s (buffer-string))) |