changeset 3664:85a3657c501d

(sendmail-pre-abbrev-expand-hook): If last-command-char is not a character, don't do the expand here.
author Richard M. Stallman <rms@gnu.org>
date Fri, 11 Jun 1993 20:48:08 +0000
parents 25743b083fe8
children 0cffa82ec7de
files lisp/mail/mailabbrev.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/mailabbrev.el	Fri Jun 11 20:11:10 1993 +0000
+++ b/lisp/mail/mailabbrev.el	Fri Jun 11 20:48:08 1993 +0000
@@ -460,7 +460,8 @@
 	     ;; the 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.
 		   ;; Use this table so that abbrevs can have hyphens in them.
 		   (set-syntax-table mail-abbrev-syntax-table)