From: Arthur Gleckler <edu/mit/csail/zurich/arthur>
Date: Fri, 30 Oct 1992 00:33:08 +0000 (+0000)
Subject: Comment out buffer auto-save disabling that doesn't work anyway
X-Git-Tag: 20090517-FFI~8815
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=a462933b231cda57bcd5dab5d0ead682d2ac6698;p=mit-scheme.git

Comment out buffer auto-save disabling that doesn't work anyway
because we (CPH and Arthur) don't know how to fix it.
---

diff --git a/v7/src/edwin/unix.scm b/v7/src/edwin/unix.scm
index b179841f3..3b8f2da8c 100644
--- a/v7/src/edwin/unix.scm
+++ b/v7/src/edwin/unix.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;;	$Id: unix.scm,v 1.27 1992/09/23 23:05:15 jinx Exp $
+;;;	$Id: unix.scm,v 1.28 1992/10/30 00:33:08 arthur Exp $
 ;;;
 ;;;	Copyright (c) 1989-1992 Massachusetts Institute of Technology
 ;;;
@@ -457,11 +457,15 @@ filename suffix \".KY\"."
 		(message "krypt: Checksum error!")
 		x))
      mark)
+    ;; CPH says that this doesn't work because mode initialization
+    ;; zaps the buffer's variables afterwards:
+#|
     ;; Disable auto-save here since we don't want to
     ;; auto-save the unencrypted contents of the 
     ;; encrypted file.
     (define-variable-local-value! (mark-buffer mark)
       (name->variable 'auto-save-default) #f)
+|#
     ))
 
 (define (maybe-write-encrypted-file region pathname visit?)