changeset 46354:ff0c68e547f7

(mail-abbrev-make-syntax-table): Check the inherited table entry.
author Andreas Schwab <schwab@suse.de>
date Sat, 13 Jul 2002 21:40:05 +0000
parents c6a6286bc21a
children 2ecef3663b04
files lisp/mail/mailabbrev.el
diffstat 1 files changed, 3 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/mailabbrev.el	Sat Jul 13 20:17:00 2002 +0000
+++ b/lisp/mail/mailabbrev.el	Sat Jul 13 21:40:05 2002 +0000
@@ -413,6 +413,9 @@
 	  (w (aref (standard-syntax-table) ?w)))
       (map-char-table
        (function (lambda (key value)
+		   (if (null value)
+		       ;; Fetch the inherited value
+		       (setq value (aref tab key)))
 		   (if (equal value _)
 		       (set-char-table-range tab key w))))
        tab)