Mercurial > emacs

changeset 14637:89952d6af6c2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(derived-mode-merge-syntax-tables): Use inheritance.
author Karl Heuer <kwzh@gnu.org>
date Wed, 21 Feb 1996 21:33:12 +0000
parents 2edced5a8756
children 46556543f4e6
files lisp/derived.el
diffstat 1 files changed, 1 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/derived.el	Wed Feb 21 21:32:35 1996 +0000
+++ b/lisp/derived.el	Wed Feb 21 21:33:12 1996 +0000
@@ -331,11 +331,7 @@
 (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,