1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-27 10:54:40 +00:00

(derived-mode-merge-syntax-tables): Use inheritance.

This commit is contained in:
Karl Heuer 1996-02-21 21:33:12 +00:00
parent fa66096961
commit 5dee7dae09

View File

@ -331,11 +331,7 @@ be automatic inheritance."
(defun derived-mode-merge-syntax-tables (old new)
"Merge an old syntax table into a new one.
Where the new table already has an entry, nothing is copied from the old one."
(map-char-table
(function (lambda (key value)
(or (char-table-range new key)
(set-char-table-range new key value))))
old))
(set-char-table-parent new old))
;; Merge an old abbrev table into a new one.
;; This function requires internal knowledge of how abbrev tables work,