From: Karl Heuer <kwzh@gnu.org>
Date: Mon, 22 May 1995 19:41:25 +0000 (+0000)
Subject: (mail-text): Expand abbrev before moving point.
X-Git-Tag: emacs-19.34~3992
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e3b671fc68334ee4607f2516e99eaa404009059a;p=emacs.git

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

diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el
index b2e5c480e49..8fa16eefa1c 100644
--- a/lisp/mail/sendmail.el
+++ b/lisp/mail/sendmail.el
@@ -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")))