diff lisp/mail/mailabbrev.el @ 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 507f64624555
children 87f7ff6bba51
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)