From e1a3a8436fc8fd917bed7ea90e8a8f22330e8767 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Thu, 20 Apr 1995 21:27:14 +0000 Subject: [PATCH] (sendmail-pre-abbrev-expand-hook): When setting the dummy value for abbrev-start-location, use (point-max) rather than (point), so we won't delete a "-" that happens to be at point. --- lisp/mail/mailabbrev.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/mail/mailabbrev.el b/lisp/mail/mailabbrev.el index 27d54fed305..3245fc9e958 100644 --- a/lisp/mail/mailabbrev.el +++ b/lisp/mail/mailabbrev.el @@ -458,7 +458,7 @@ characters which may be a part of the name of a mail alias.") (expand-abbrev) ;; Now set it back to what it was before. (set-syntax-table mail-mode-header-syntax-table))) - (setq abbrev-start-location (point) ; This is the trick. + (setq abbrev-start-location (point-max) ; This is the trick. abbrev-start-location-buffer (current-buffer))) ;; We're not in a mail header where mail aliases should -- 2.39.5