Commit 645d6219 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(sendmail-pre-abbrev-expand-hook):

If last-command-char is not a character, don't do the expand here.
parent b3771493
...@@ -460,7 +460,8 @@ characters which may be a part of the name of a mail-alias.") ...@@ -460,7 +460,8 @@ characters which may be a part of the name of a mail-alias.")
;; the mail-mode-header-syntax-table. ;; the mail-mode-header-syntax-table.
(set-syntax-table mail-mode-header-syntax-table) (set-syntax-table mail-mode-header-syntax-table)
(or (eq (char-syntax last-command-char) ?_) (or (not (integerp last-command-char))
(eq (char-syntax last-command-char) ?_)
(let ((pre-abbrev-expand-hook nil)) ; That's us; don't loop. (let ((pre-abbrev-expand-hook nil)) ; That's us; don't loop.
;; Use this table so that abbrevs can have hyphens in them. ;; Use this table so that abbrevs can have hyphens in them.
(set-syntax-table mail-abbrev-syntax-table) (set-syntax-table mail-abbrev-syntax-table)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment