From eac59e3cc7d84cd557d5546fb5000289560eb686 Mon Sep 17 00:00:00 2001 From: Andreas Schwab Date: Wed, 8 Aug 2007 11:52:16 +0000 Subject: [PATCH] (sendmail-pre-abbrev-expand-hook): Check for self-insert-command, not self-insert. --- lisp/ChangeLog | 5 +++++ lisp/mail/mailabbrev.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index c80c0b07cf3..9b8a5fedbee 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2007-08-08 Andreas Schwab + + * mail/mailabbrev.el (sendmail-pre-abbrev-expand-hook): Check for + self-insert-command, not self-insert. + 2007-08-08 Glenn Morris * emacs-lisp/eldoc.el (eldoc-get-fnsym-args-string): Make second diff --git a/lisp/mail/mailabbrev.el b/lisp/mail/mailabbrev.el index b3e2c051e7d..8862e6ca2d2 100644 --- a/lisp/mail/mailabbrev.el +++ b/lisp/mail/mailabbrev.el @@ -495,7 +495,7 @@ of a mail alias. The value is set up, buffer-local, when first needed.") (or (and (integerp last-command-char) ;; Some commands such as M-> may want to expand first. - (equal this-command 'self-insert) + (equal this-command 'self-insert-command) (or (eq (char-syntax last-command-char) ?_) ;; Don't expand on @. (memq last-command-char '(?@ ?. ?% ?! ?_ ?-)))) -- 2.39.2