(mail-abbrev-make-syntax-table): Use (syntax-table), not old-syntax-table.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 962a6cb058e725ae1ffda55a307ea82519b29f38..278bc50968b4413837f6c5b1c75e6e4f9fd366d7 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,11 @@
+2002-04-04  Richard M. Stallman  <rms@gnu.org>
+
+       * mail/mailabbrev.el (mail-abbrev-make-syntax-table):
+       Use (syntax-table), not old-syntax-table.
+
+       * enriched.el (enriched-decode-foreground) 
+       (enriched-decode-background): Don't call facemenu-get-face.
+
 2002-04-04  Mike Williams  <mdub@bigfoot.com>
 
        * textmodes/sgml-mode.el: Add missing require.

diff --git a/lisp/mail/mailabbrev.el b/lisp/mail/mailabbrev.el
index 86201cf0d2aadce1e0fe1df41970d15dd95175bd..493e508f1457bbde7f00a4a2ca55db4760165932 100644 (file)
--- a/lisp/mail/mailabbrev.el
+++ b/lisp/mail/mailabbrev.el
@@ -408,7 +408,7 @@ of a mail alias.  The value is set up, buffer-local, when first needed.")
 (defun mail-abbrev-make-syntax-table ()
   (make-local-variable 'mail-abbrev-syntax-table)
   (unless mail-abbrev-syntax-table
-    (let ((tab (copy-syntax-table old-syntax-table))
+    (let ((tab (copy-syntax-table (syntax-table)))
          (_ (aref (standard-syntax-table) ?_))
          (w (aref (standard-syntax-table) ?w)))
       (map-char-table