From b8f9c6dc6156cbe276afbe9a9d881a3945aa1219 Mon Sep 17 00:00:00 2001 From: morioka Date: Wed, 4 Nov 1998 06:59:16 +0000 Subject: [PATCH] (entity-buffer): Must move to (point-min) before search boundary between header and body (to fix problem in Emacs). --- lisp/mmgnus.el | 1 + 1 file changed, 1 insertion(+) diff --git a/lisp/mmgnus.el b/lisp/mmgnus.el index 489065d..a2f5d2c 100644 --- a/lisp/mmgnus.el +++ b/lisp/mmgnus.el @@ -36,6 +36,7 @@ (set-buffer gnus-original-article-buffer) (mime-entity-set-header-start-internal entity (point-min)) (mime-entity-set-body-end-internal entity (point-max)) + (goto-char (point-min)) (if (re-search-forward "^$" nil t) (progn (mime-entity-set-header-end-internal entity (match-end 0)) -- 1.7.10.4