From: Chris Hanson <org/chris-hanson/cph>
Date: Fri, 3 May 1996 06:58:59 +0000 (+0000)
Subject: Change command names and documentation strings to use the noun "frame"
X-Git-Tag: 20090517-FFI~5556
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=7fc13e322639992ff7c8dfa68883263545308dcd;p=mit-scheme.git

Change command names and documentation strings to use the noun "frame"
rather than "screen".
---

diff --git a/v7/src/edwin/win32com.scm b/v7/src/edwin/win32com.scm
index 741c09111..4d65da824 100644
--- a/v7/src/edwin/win32com.scm
+++ b/v7/src/edwin/win32com.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;;	$Id: win32com.scm,v 1.5 1996/05/03 06:58:21 cph Exp $
+;;;	$Id: win32com.scm,v 1.6 1996/05/03 06:58:59 cph Exp $
 ;;;
 ;;;	Copyright (c) 1994-96 Massachusetts Institute of Technology
 ;;;
@@ -159,8 +159,4 @@ desktop."
 		   (format-modeline-string window format length)))))))
       (update-name win32-screen/set-name!
 		   (ref-variable frame-name-format buffer)
-		   (ref-variable frame-name-length buffer)))))
-
-(define edwin-command$set-screen-position edwin-command$set-frame-position)
-(define edwin-command$show-screen-size edwin-command$show-frame-size)
-(define edwin-command$show-screen-position edwin-command$show-frame-position)
\ No newline at end of file
+		   (ref-variable frame-name-length buffer)))))
\ No newline at end of file