summaryrefslogtreecommitdiff
path: root/lisp/mail/mailabbrev.el
diff options
context:
space:
mode:
authorNoah Friedman <friedman@splode.com>1995-10-09 04:49:15 +0000
committerNoah Friedman <friedman@splode.com>1995-10-09 04:49:15 +0000
commit7cb41cf10e4419148e3382478ccf7dc8e313a0fa (patch)
treed1cb7a659b499b4af7fe16e2b4d34a35395f4562 /lisp/mail/mailabbrev.el
parentbd2d628b94eb565a244284b631cc59ee7c5b3d05 (diff)
downloademacs-7cb41cf10e4419148e3382478ccf7dc8e313a0fa.tar.gz
(mail-abbrev-syntax-table): Use `equal' instead of `=', in case elts
of syntax table are lists, not integers.
Diffstat (limited to 'lisp/mail/mailabbrev.el')
-rw-r--r--lisp/mail/mailabbrev.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mail/mailabbrev.el b/lisp/mail/mailabbrev.el
index 84debb0bd95..4491e097af0 100644
--- a/lisp/mail/mailabbrev.el
+++ b/lisp/mail/mailabbrev.el
@@ -372,7 +372,7 @@ non-address headers.")
(_ (aref (standard-syntax-table) ?_))
(w (aref (standard-syntax-table) ?w)))
(while (>= i 0)
- (if (= (aref tab i) _) (aset tab i w))
+ (if (equal (aref tab i) _) (aset tab i w))
(setq i (1- i)))
tab)
"The syntax-table used for abbrev-expansion purposes; this is not actually