From eb2a9bd9360de77a6c52f486f8ac1b5010555d8e Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Tue, 20 Jan 1998 02:35:36 +0000
Subject: [PATCH] Don't disable compressed and encrypted files.  Info needs
 compressed files to do its job properly.

---
 v7/src/6001/edextra.scm | 9 +--------
 1 file changed, 1 insertion(+), 8 deletions(-)

diff --git a/v7/src/6001/edextra.scm b/v7/src/6001/edextra.scm
index cb8dfea26..0124e81b5 100644
--- a/v7/src/6001/edextra.scm
+++ b/v7/src/6001/edextra.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: edextra.scm,v 1.24 1998/01/03 18:12:52 cph Exp $
+$Id: edextra.scm,v 1.25 1998/01/20 02:35:36 cph Exp $
 
 Copyright (c) 1992-98 Massachusetts Institute of Technology
 
@@ -400,13 +400,6 @@ option the file from the problem set will not be installed.
 (set-variable! repl-error-decision true)
 (set-variable! version-control true)
 (set-variable! trim-versions-without-asking true)
-(let ((variable-bound?
-       (lambda (name)
-	 (string-table-get editor-variables (symbol->string name)))))
-  (if (variable-bound? 'enable-compressed-files)
-      (set-variable! enable-compressed-files false))
-  (if (variable-bound? 'enable-encrypted-files)
-      (set-variable! enable-encrypted-files false)))
 
 (if (eq? 'UNIX microcode-id/operating-system)
     (set-variable!
-- 
2.25.1