diff options
| author | David Edmondson <dme@dme.org> | 2012-03-10 02:02:24 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka <yamaoka@jpl.org> | 2012-03-10 02:02:24 +0000 |
| commit | 972596ccca545e2d1b11f44880296510ac181ac9 (patch) | |
| tree | daed2bb4916e0a1ba5b5c8893f1bbfa4e0070e5f /lisp/gnus/mm-uu.el | |
| parent | 052e28acfcae37d8108fa195890482cc7f2ddaa1 (diff) | |
| download | emacs-972596ccca545e2d1b11f44880296510ac181ac9.tar.gz emacs-972596ccca545e2d1b11f44880296510ac181ac9.tar.bz2 emacs-972596ccca545e2d1b11f44880296510ac181ac9.zip | |
mm-uu.el (mm-uu-forward-extract): Be more liberal when extracting forwards as MIME
Diffstat (limited to 'lisp/gnus/mm-uu.el')
| -rw-r--r-- | lisp/gnus/mm-uu.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/gnus/mm-uu.el b/lisp/gnus/mm-uu.el index 4f046d6a422..0cf3730d095 100644 --- a/lisp/gnus/mm-uu.el +++ b/lisp/gnus/mm-uu.el @@ -430,7 +430,11 @@ apply the face `mm-uu-extract'." (defun mm-uu-forward-extract () (mm-make-handle (mm-uu-copy-to-buffer - (progn (goto-char start-point) (forward-line) (point)) + (progn + (goto-char start-point) + (forward-line) + (skip-chars-forward "\n") + (point)) (progn (goto-char end-point) (forward-line -1) (point))) '("message/rfc822" (charset . gnus-decoded)))) |