* [PATCH] mm-uu.el (mm-uu-forward-extract): Allow for blank lines between the 'Forwarded Message' header and the start of the message.
@ 2012-02-24 12:21 David Edmondson
2012-03-10 0:57 ` Lars Magne Ingebrigtsen
0 siblings, 1 reply; 2+ messages in thread
From: David Edmondson @ 2012-02-24 12:21 UTC (permalink / raw)
To: ding
---
lisp/mm-uu.el | 6 +++++-
1 files changed, 5 insertions(+), 1 deletions(-)
diff --git a/lisp/mm-uu.el b/lisp/mm-uu.el
index 327665b..964d418 100644
--- a/lisp/mm-uu.el
+++ b/lisp/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))))
--
1.7.9
^ permalink raw reply [flat|nested] 2+ messages in thread
end of thread, other threads:[~2012-03-10 0:57 UTC | newest]
Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2012-02-24 12:21 [PATCH] mm-uu.el (mm-uu-forward-extract): Allow for blank lines between the 'Forwarded Message' header and the start of the message David Edmondson
2012-03-10 0:57 ` Lars Magne Ingebrigtsen
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).