From: Chris Hanson <org/chris-hanson/cph>
Date: Sat, 4 Nov 1995 02:39:34 +0000 (+0000)
Subject: Set the icon of each graphics window to the standard graphics icon.
X-Git-Tag: 20090517-FFI~5771
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=193f11a7e3ba1aa143ec6c12c989efd2e49d4a10;p=mit-scheme.git

Set the icon of each graphics window to the standard graphics icon.
---

diff --git a/v7/src/runtime/runtime.pkg b/v7/src/runtime/runtime.pkg
index 97ebef6f1..bd3e1cf96 100644
--- a/v7/src/runtime/runtime.pkg
+++ b/v7/src/runtime/runtime.pkg
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: runtime.pkg,v 14.263 1995/10/28 01:55:08 cph Exp $
+$Id: runtime.pkg,v 14.264 1995/11/04 02:39:34 cph Exp $
 
 Copyright (c) 1988-95 Massachusetts Institute of Technology
 
@@ -2548,6 +2548,8 @@ MIT in each case. |#
 	  font-metrics/height
 	  font-metrics/width
 	  help-event/code
+	  hwnd_desktop
+	  idi_graphics
 	  kc_alt
 	  kc_char
 	  kc_composite
@@ -2605,6 +2607,7 @@ MIT in each case. |#
 	  ms_conditionalcascade
 	  ms_titlebutton
 	  ms_verticalflip
+	  nullhandle
 	  number-of-event-types
 	  os2menu-create
 	  os2menu-destroy
@@ -2649,6 +2652,7 @@ MIT in each case. |#
 	  os2win-console-wid
 	  os2win-desktop-height
 	  os2win-desktop-width
+	  os2win-destroy-pointer
 	  os2win-event-ready?
 	  os2win-focus?
 	  os2win-frame-handle
@@ -2657,12 +2661,14 @@ MIT in each case. |#
 	  os2win-get-pos
 	  os2win-get-size
 	  os2win-invalidate
+	  os2win-load-pointer
 	  os2win-move-cursor
 	  os2win-open
 	  os2win-open-event-qid
 	  os2win-ps
 	  os2win-scroll
 	  os2win-set-grid
+	  os2win-set-icon
 	  os2win-set-pos
 	  os2win-set-size
 	  os2win-set-state