# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 824938392 0
# Node ID 89952d6af6c2180f798c35d07e416ae5509914f4
# Parent  2edced5a8756655ffc6446437a5b1ce5a98335f9
(derived-mode-merge-syntax-tables): Use inheritance.

diff -r 2edced5a8756 -r 89952d6af6c2 lisp/derived.el
--- 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,