From: Chris Hanson <org/chris-hanson/cph>
Date: Tue, 23 May 2000 04:50:52 +0000 (+0000)
Subject: Don't bind imail-delete-folder to a key.  It should be hard to do this.
X-Git-Tag: 20090517-FFI~3712
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=6eb7201602116bd0a1d3402ce2e5557871ca1055;p=mit-scheme.git

Don't bind imail-delete-folder to a key.  It should be hard to do this.
---

diff --git a/v7/src/imail/imail-top.scm b/v7/src/imail/imail-top.scm
index e9743c12a..fbcc4f77a 100644
--- a/v7/src/imail/imail-top.scm
+++ b/v7/src/imail/imail-top.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;; $Id: imail-top.scm,v 1.97 2000/05/23 04:36:24 cph Exp $
+;;; $Id: imail-top.scm,v 1.98 2000/05/23 04:50:52 cph Exp $
 ;;;
 ;;; Copyright (c) 1999-2000 Massachusetts Institute of Technology
 ;;;
@@ -381,7 +381,7 @@ DEL	Scroll to previous screen of this message.
 (define-key 'imail #\o		'imail-output)
 (define-key 'imail #\i		'imail-input)
 (define-key 'imail #\+		'imail-create-folder)
-(define-key 'imail #\-		'imail-delete-folder)
+;(define-key 'imail #\-		'imail-delete-folder)
 (define-key 'imail #\q		'imail-quit)
 (define-key 'imail #\?		'describe-mode)