# HG changeset patch
# User Miles Bader <miles@gnu.org>
# Date 836324614 0
# Node ID 4d843931581c3c9d1ae2a4a47c5572d3e50e7e6e
# Parent  1808d2672d00850ad34c0ba484c23a7d2076aacf
(mail-hist-current-header-name): Use buffer-substring-no-properties.

diff -r 1808d2672d00 -r 4d843931581c lisp/mail/mail-hist.el
--- a/lisp/mail/mail-hist.el	Tue Jul 02 00:01:05 1996 +0000
+++ b/lisp/mail/mail-hist.el	Tue Jul 02 16:23:34 1996 +0000
@@ -117,7 +117,7 @@
         (and
          name-start
          name-end
-         (downcase (buffer-substring name-start name-end)))))))
+         (downcase (buffer-substring-no-properties name-start name-end)))))))
 
 (defsubst mail-hist-forward-header (count)
   "Move forward COUNT headers (backward if COUNT is negative).