(mail-text): Expand abbrev before moving point.

This commit is contained in:
Karl Heuer 1995-05-22 19:41:25 +00:00
parent c2e1680ae1
commit e3b671fc68

View file

@ -772,6 +772,7 @@ the user from the mailer."
(defun mail-text ()
"Move point to beginning of message text."
(interactive)
(expand-abbrev)
(goto-char (point-min))
(search-forward (concat "\n" mail-header-separator "\n")))