From: Andreas Schwab Date: Wed, 8 Aug 2007 11:52:16 +0000 (+0000) Subject: (sendmail-pre-abbrev-expand-hook): Check for X-Git-Tag: emacs-pretest-23.0.90~11545 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=eac59e3cc7d84cd557d5546fb5000289560eb686;p=emacs.git (sendmail-pre-abbrev-expand-hook): Check for self-insert-command, not self-insert. --- 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 '(?@ ?. ?% ?! ?_ ?-))))