(mail-hist-current-header-contents):

Fix previous change: use mail-header-end.
This commit is contained in:
Karl Heuer 1998-09-06 14:09:31 +00:00
parent 5e24a1f76c
commit 3ec353b132

View file

@ -172,7 +172,7 @@ colon, or just after the colon if it is not followed by whitespace."
(mail-hist-beginning-of-header)
(let ((start (point)))
(or (mail-hist-forward-header 1)
(goto-char (mail-text-start)))
(goto-char (mail-header-end)))
(beginning-of-line)
(buffer-substring start (1- (point))))))