From: Chris Hanson <org/chris-hanson/cph>
Date: Wed, 18 Nov 1998 03:32:14 +0000 (+0000)
Subject: Eliminate mistaken extra binding for C-c C-u in interaction mode.
X-Git-Tag: 20090517-FFI~4716
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=a55b63d0bc1753e2903b4327761aed8c51bbe060;p=mit-scheme.git

Eliminate mistaken extra binding for C-c C-u in interaction mode.
---

diff --git a/v7/src/edwin/intmod.scm b/v7/src/edwin/intmod.scm
index 92c7836fa..c26c8a12d 100644
--- a/v7/src/edwin/intmod.scm
+++ b/v7/src/edwin/intmod.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;;	$Id: intmod.scm,v 1.93 1998/06/21 09:02:01 cph Exp $
+;;;	$Id: intmod.scm,v 1.94 1998/11/18 03:32:14 cph Exp $
 ;;;
 ;;;	Copyright (c) 1986, 1989-98 Massachusetts Institute of Technology
 ;;;
@@ -428,7 +428,7 @@ The REPL may be controlled by the following commands:
 (define-key 'inferior-repl '(#\C-c #\C-o) 'inferior-repl-flush-output)
 (define-key 'inferior-repl '(#\C-c #\C-r) 'comint-history-search-backward)
 (define-key 'inferior-repl '(#\C-c #\C-s) 'comint-history-search-forward)
-(define-key 'inferior-repl '(#\C-c #\C-u) 'comint-kill-input)
+;;(define-key 'inferior-repl '(#\C-c #\C-u) 'comint-kill-input)
 
 (define-key 'inferior-repl '(#\C-c #\C-d) 'inferior-repl-debug)