diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/mail/mailabbrev.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mail/mailabbrev.el b/lisp/mail/mailabbrev.el index dcdf3708d60..00ecb7f0cdd 100644 --- a/lisp/mail/mailabbrev.el +++ b/lisp/mail/mailabbrev.el @@ -460,8 +460,8 @@ characters which may be a part of the name of a mail-alias.") ;; the mail-mode-header-syntax-table. (set-syntax-table mail-mode-header-syntax-table) - (or (not (integerp last-command-char)) - (eq (char-syntax last-command-char) ?_) + (or (and (integerp last-command-char) + (eq (char-syntax last-command-char) ?_)) (let ((pre-abbrev-expand-hook nil)) ; That's us; don't loop. ;; Use this table so that abbrevs can have hyphens in them. (set-syntax-table mail-abbrev-syntax-table) |