Mercurial > emacs
comparison lisp/mail/mail-hist.el @ 15581:4d843931581c
(mail-hist-current-header-name): Use buffer-substring-no-properties.
author | Miles Bader <miles@gnu.org> |
---|---|
date | Tue, 02 Jul 1996 16:23:34 +0000 |
parents | 282d941a8073 |
children | 16042c6fda41 |
comparison
equal
deleted
inserted
replaced
15580:1808d2672d00 | 15581:4d843931581c |
---|---|
115 (name-end | 115 (name-end |
116 (prog2 (search-forward ":" body-start t) (1- (point))))) | 116 (prog2 (search-forward ":" body-start t) (1- (point))))) |
117 (and | 117 (and |
118 name-start | 118 name-start |
119 name-end | 119 name-end |
120 (downcase (buffer-substring name-start name-end))))))) | 120 (downcase (buffer-substring-no-properties name-start name-end))))))) |
121 | 121 |
122 (defsubst mail-hist-forward-header (count) | 122 (defsubst mail-hist-forward-header (count) |
123 "Move forward COUNT headers (backward if COUNT is negative). | 123 "Move forward COUNT headers (backward if COUNT is negative). |
124 If last/first header is encountered first, stop there and returns | 124 If last/first header is encountered first, stop there and returns |
125 nil. | 125 nil. |