From: Chris Hanson <org/chris-hanson/cph>
Date: Fri, 10 May 1991 22:18:47 +0000 (+0000)
Subject: Rename window-minimum- variables to window-min-.
X-Git-Tag: 20090517-FFI~10601
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=3a9fa34ad5cd4675f93976943a2747ec7dfd92c1;p=mit-scheme.git

Rename window-minimum- variables to window-min-.
---

diff --git a/v7/src/edwin/buffrm.scm b/v7/src/edwin/buffrm.scm
index 675d85d45..681fbcb17 100644
--- a/v7/src/edwin/buffrm.scm
+++ b/v7/src/edwin/buffrm.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;;	$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/buffrm.scm,v 1.39 1991/03/22 00:30:50 cph Exp $
+;;;	$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/buffrm.scm,v 1.40 1991/05/10 22:18:47 cph Exp $
 ;;;
 ;;;	Copyright (c) 1986, 1989-91 Massachusetts Institute of Technology
 ;;;
@@ -145,15 +145,15 @@
 
 (define-method buffer-frame (:minimum-x-size window)
   (if (window-has-right-neighbor? window)
-      (+ (ref-variable window-minimum-width)
+      (+ (ref-variable window-min-width)
 	 (inferior-x-size border-inferior))
-      (ref-variable window-minimum-width)))
+      (ref-variable window-min-width)))
 
 (define-method buffer-frame (:minimum-y-size window)
   (if modeline-inferior
-      (+ (ref-variable window-minimum-height)
+      (+ (ref-variable window-min-height)
 	 (inferior-y-size modeline-inferior))
-      (ref-variable window-minimum-height)))
+      (ref-variable window-min-height)))
 
 ;;;; External Entries