FileBrowserV2.st
changeset 7630 4033fd07cfe2
parent 7614 0b7ae7d97287
child 7642 7a736bd24cbd
--- a/FileBrowserV2.st	Tue Feb 06 19:11:00 2007 +0100
+++ b/FileBrowserV2.st	Tue Feb 06 19:41:00 2007 +0100
@@ -368,29 +368,9 @@
 !
 
 defaultIcon
-    "This resource specification was automatically generated
-     by the ImageEditor of ST/X."
-
-    "Do not manually edit this!! If it is corrupted,
-     the ImageEditor may not be able to read the specification."
-
-    "
-     self defaultIcon inspect
-     ImageEditor openOnClass:self andSelector:#defaultIcon
-    "
+    <resource: #programImage>
 
-    <resource: #image>
-
-    ^Icon
-        constantNamed:#'FileBrowserV2 class defaultIcon'
-        ifAbsentPut:[(Depth4Image new) width: 28; height: 28; photometric:(#palette); bitsPerSample:(#(4 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'
-@@@@@@@@@@@@@@@@@@@@CLA&Y&Y&Y&X@@ADP@@@L0F@@@@@@A @ADAD@@@3@XN;.;.8F@ADPDQ@@CLA ;.@@@@@@D@@@D@@L0FC.8O[6=/@QDADP@@3@X@; 
-[6=/[0DPDP@@CLA DNC6<@@F<ADP@@@L0F@A@F= [0= @@@@@@3@X@@P=/[6=/@@@@@@CLA @@A/[6=/X@@@@@@L0FC0@O[6=/[0@@@@@@3@XF<@@@@@@@@@
-@@@@CLA = @@@@@@@@@@@@@L0FA/[6=/A @@@@@@@@3@XO[6=/XF@@@@@@@@CLA @@@@@@X@@@@@@@@L0FY&Y&Y&Y @@@@@@@@C@Y&Y&Y&Y&@@@@@@@@@@@@
-@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@N@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
-@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@C @b') ; colorMapFromArray:#[0 0 0 255 255 255 255 0 0 0 255 0 0 0 255 0 255 255 255 255 0 255 0 255 127 0 0 0 127 0 0 0 127 0 127 127 127 127 0 127 0 127 127 127 127 170 170 170]; mask:((Depth1Image new) width: 28; height: 28; photometric:(#blackIs0); bitsPerSample:(#(1 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'
-O??# C??9<@??>? O???<C????@????0O???8C???<@???>@O??<@C???@@???0@O??<@C??8@@??>@@O?? @C??8@@??>@@G?? @@??8@@@@@@@G.P=0AAD
-HP@PQBD@GDP8 AADHD@PQBA@DN^=0@@a') ; yourself); yourself]
+    ^ ToolbarIconLibrary startNewFileBrowserIcon
 !
 
 encodingLockIcon
@@ -438,7 +418,7 @@
           min: (Point 10 10)
           bounds: (Rectangle 0 0 800 600)
           menu: mainMenu
-          icon: applicationIcon
+          icon: defaultIcon
         )
         component: 
        (SpecCollection
@@ -1871,7 +1851,7 @@
 !FileBrowserV2 class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.164 2007-02-05 09:52:42 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.165 2007-02-06 18:41:00 stefan Exp $'
 ! !
 
 FileBrowserV2 initialize!