Load an icon resource for the console window.

diff --git a/v7/src/microcode/os2pmcon.c b/v7/src/microcode/os2pmcon.c
index 138d5e904dbb08c49ce95a0b8002407ccd9cff3c..b205a8e5f34128d80beb38220fcf5bef0e294504 100644 (file)
--- a/v7/src/microcode/os2pmcon.c
+++ b/v7/src/microcode/os2pmcon.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Id: os2pmcon.c,v 1.18 1995/11/04 00:10:51 cph Exp $
+$Id: os2pmcon.c,v 1.19 1995/11/04 01:01:08 cph Exp $
 
 Copyright (c) 1994-95 Massachusetts Institute of Technology
 
@@ -161,7 +161,7 @@ OS2_initialize_pm_console (void)
                          (FCF_TITLEBAR | FCF_SYSMENU
                           | FCF_SHELLPOSITION | FCF_SIZEBORDER
                           | FCF_MINMAX | FCF_TASKLIST
-                          | FCF_MENU | FCF_ACCELTABLE),
+                          | FCF_MENU | FCF_ACCELTABLE | FCF_ICON),
                          NULLHANDLE,
                          ID_PMCON_RESOURCES,
                          0, "Scheme"));

diff --git a/v7/src/microcode/os2pmcon.rc b/v7/src/microcode/os2pmcon.rc
index 1da75c6853ba82a3de148315c20e0815732a08ad..d1a303f96a1b569cad8fee58be6ef3b09bb59722 100644 (file)
--- a/v7/src/microcode/os2pmcon.rc
+++ b/v7/src/microcode/os2pmcon.rc
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Id: os2pmcon.rc,v 1.2 1995/11/03 01:30:07 cph Exp $
+$Id: os2pmcon.rc,v 1.3 1995/11/04 01:01:16 cph Exp $
 
 Copyright (c) 1995 Massachusetts Institute of Technology
 
@@ -37,6 +37,31 @@ MIT in each case. */
 #include <os2.h>
 #include "os2pmcon.h"
 
+#ifdef SCHEME
+ICON ID_PMCON_RESOURCES "os2utl\\lambda2.ico"
+ICON 11 "os2utl\\bch.ico"
+#else
+#ifdef BCHSCHEM
+ICON ID_PMCON_RESOURCES "os2utl\\bch.ico"
+ICON 11 "os2utl\\lambda2.ico"
+#endif
+#endif
+
+ICON 12 "os2utl\\coffee.ico"
+ICON 13 "os2utl\\conses.ico"
+ICON 14 "os2utl\\edwin.ico"
+ICON 15 "os2utl\\envir1.ico"
+ICON 16 "os2utl\\graphics.ico"
+ICON 17 "os2utl\\lambda.ico"
+ICON 18 "os2utl\\liar1.ico"
+ICON 19 "os2utl\\liar2.ico"
+ICON 20 "os2utl\\liar3.ico"
+ICON 21 "os2utl\\mincer.ico"
+ICON 22 "os2utl\\shield1.ico"
+ICON 23 "os2utl\\shield2.ico"
+ICON 24 "os2utl\\shield3.ico"
+ICON 25 "os2utl\\shield4.ico"
+
 MENU ID_PMCON_RESOURCES
 {
   SUBMENU "~File", IDM_FILE