(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.

1 files changed, 1 insertions, 1 deletions

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