mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00
Code Issues Projects Releases Wiki Activity

2000-09-29 09:56:34 ShengHuo ZHU <zsh@cs.rochester.edu>

Browse source 
* nndoc.el (nndoc-dissect-mime-parts-sub): Correctly mark body-begin.
This commit is contained in:
Dave Love 2000-11-08 23:19:00 +00:00
parent 18a84b0f9f
commit 2e36fdceb3
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/gnus/nndoc.el
View file

@ -701,7 +701,8 @@ PARENT is the message-ID of the parent summary line, or nil for none."
subject content-type type subtype boundary-regexp)
;; Gracefully handle a missing body.
(goto-char head-begin)
(if (search-forward "\n\n" body-end t)
(if (or (and (eq (char-after) ?\n) (or (forward-char 1) t))
(search-forward "\n\n" body-end t))
(setq head-end (1- (point))
body-begin (point))
(setq head-end body-end