# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 871651826 -7200
# Node ID 9f6e0e8c3ab8d2bb2fe2b6dd424438a6bd89352e
# Parent  93e2021e4ac8c37c2caafeb79d9a8aa381c81ed8
fixed icon

diff -r 93e2021e4ac8 -r 9f6e0e8c3ab8 BrowserView.st
--- a/BrowserView.st	Fri Aug 15 15:28:36 1997 +0200
+++ b/BrowserView.st	Fri Aug 15 15:30:26 1997 +0200
@@ -114,14 +114,14 @@
 defaultIcon
     "return the browsers default window icon"
 
-    <resource: #style (#ICON #ICON_FILE)>
+    <resource: #style (#SYSTEMBROWSER_ICON #SYSTEMBROWSER_ICON_FILE)>
 
     |nm i|
 
     (i := DefaultIcon) isNil ifTrue:[
-        i := self classResources at:'ICON' default:nil.
+        i := self classResources at:'SYSTEMBROWSER_ICON' default:nil.
         i isNil ifTrue:[
-            nm := ClassResources at:'ICON_FILE' default:'SBrowser.xbm'.
+            nm := ClassResources at:'SYSTEMBROWSER_ICON_FILE' default:'SBrowser.xbm'.
             i := Image fromFile:nm resolution:100.
             i isNil ifTrue:[
                 i := Image fromFile:('bitmaps/' , nm) resolution:100.
@@ -137,7 +137,7 @@
     ^ i
 
     "Modified: 19.3.1997 / 20:48:34 / ca"
-    "Modified: 18.4.1997 / 15:16:21 / cg"
+    "Modified: 15.8.1997 / 15:29:16 / cg"
 !
 
 stopIcon
@@ -10520,6 +10520,6 @@
 !BrowserView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.331 1997-08-13 13:22:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.332 1997-08-15 13:30:26 cg Exp $'
 ! !
 BrowserView initialize!
diff -r 93e2021e4ac8 -r 9f6e0e8c3ab8 BrwsrView.st
--- a/BrwsrView.st	Fri Aug 15 15:28:36 1997 +0200
+++ b/BrwsrView.st	Fri Aug 15 15:30:26 1997 +0200
@@ -114,14 +114,14 @@
 defaultIcon
     "return the browsers default window icon"
 
-    <resource: #style (#ICON #ICON_FILE)>
+    <resource: #style (#SYSTEMBROWSER_ICON #SYSTEMBROWSER_ICON_FILE)>
 
     |nm i|
 
     (i := DefaultIcon) isNil ifTrue:[
-        i := self classResources at:'ICON' default:nil.
+        i := self classResources at:'SYSTEMBROWSER_ICON' default:nil.
         i isNil ifTrue:[
-            nm := ClassResources at:'ICON_FILE' default:'SBrowser.xbm'.
+            nm := ClassResources at:'SYSTEMBROWSER_ICON_FILE' default:'SBrowser.xbm'.
             i := Image fromFile:nm resolution:100.
             i isNil ifTrue:[
                 i := Image fromFile:('bitmaps/' , nm) resolution:100.
@@ -137,7 +137,7 @@
     ^ i
 
     "Modified: 19.3.1997 / 20:48:34 / ca"
-    "Modified: 18.4.1997 / 15:16:21 / cg"
+    "Modified: 15.8.1997 / 15:29:16 / cg"
 !
 
 stopIcon
@@ -10520,6 +10520,6 @@
 !BrowserView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Attic/BrwsrView.st,v 1.331 1997-08-13 13:22:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Attic/BrwsrView.st,v 1.332 1997-08-15 13:30:26 cg Exp $'
 ! !
 BrowserView initialize!