From a984d4e09cc2e69b20a342e55cc662fde1d6f0f4 Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Wed, 7 Jun 1995 19:01:43 +0000
Subject: [PATCH] When user requests that the last screen be closed, this
 should act like C-x C-c instead of C-x c.

---
 v7/src/edwin/curren.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/v7/src/edwin/curren.scm b/v7/src/edwin/curren.scm
index 42ea3140d..67941c327 100644
--- a/v7/src/edwin/curren.scm
+++ b/v7/src/edwin/curren.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;;	$Id: curren.scm,v 1.117 1995/05/05 06:25:50 cph Exp $
+;;;	$Id: curren.scm,v 1.118 1995/06/07 19:01:43 cph Exp $
 ;;;
 ;;;	Copyright (c) 1986, 1989-95 Massachusetts Institute of Technology
 ;;;
@@ -98,7 +98,7 @@ The screen is guaranteed to be deselected at that time."
 		 (set-editor-screens! current-editor
 				      (delq! screen
 					     (editor-screens current-editor))))
-	       (save-buffers-kill-edwin)))))))
+	       ((ref-command save-buffers-kill-scheme) #t)))))))
 
 (define (select-screen screen)
   (without-interrupts
-- 
2.25.1