# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 762626737 0
# Node ID a093cbbdf14dc121078689fe3a56c468057bc982
# Parent  ec063baec3e01bc5ba4fff444866369785cf1bc6
(inferior-scheme-mode-map): Use copy-keymap.

diff -r ec063baec3e0 -r a093cbbdf14d lisp/cmuscheme.el
--- a/lisp/cmuscheme.el	Wed Mar 02 16:45:12 1994 +0000
+++ b/lisp/cmuscheme.el	Wed Mar 02 16:45:37 1994 +0000
@@ -117,7 +117,7 @@
 
 (cond ((not inferior-scheme-mode-map)
        (setq inferior-scheme-mode-map
-	     (full-copy-sparse-keymap comint-mode-map))
+	     (copy-keymap comint-mode-map))
        (define-key inferior-scheme-mode-map "\M-\C-x" ;gnu convention
 	           'scheme-send-definition)
        (define-key inferior-scheme-mode-map "\C-x\C-e" 'scheme-send-last-sexp)