diff -r cfc396fb8c98 -r 9a42d2d7ff05 UIPainter.st --- a/UIPainter.st Mon May 09 10:08:38 2016 +0200 +++ b/UIPainter.st Mon May 09 19:55:10 2016 +0200 @@ -1,5 +1,3 @@ -"{ Encoding: utf8 }" - " COPYRIGHT (c) 1995-1998 by eXept Software AG All Rights Reserved @@ -707,6 +705,30 @@ ] ! +builderIcon + "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 builderIcon inspect + ImageEditor openOnClass:self andSelector:#builderIcon + Icon flushCachedIcons + " + + + + ^Icon + constantNamed:'UIPainter builderIcon' + ifAbsentPut:[(Depth1Image width:48 height:48 photometric:#whiteIs0) bits:(ByteArray fromPackedString:' +@@@@@@@@O??????DH_@IC??$H_@IC??4H_@IC??$H_@IC?>DH_@F@J DH_@F@M DH_@F@J DH_@F@M DH_@F@J DH_@F@M D +H_@F@J DH_@F@M DH_@F@J DH_@F@M DH_@F@J DH_@_ M DH_@ PJ DH_@)PM DH_@)PJ DH_@)PM DH? )PJ DI?0)PM DK?8)PJ DK18)PM DK 8)PJ D +K@X)PM DK@X PG@DK@X_ @@DH@@@@@@DH@@@@@@DO??????<@@@@@@@@NDIHNG''@IDIHIDD H$IHH$DPIDIHH$DPNDIHH$D IDIHH''G@H$IHH$E@H$IHH$D +IBQHIDDPNA!!ONG$P@@@@@@@@'); yourself] +! + defaultIcon @@ -5132,7 +5154,7 @@ ^ self. ]. - icon := Smalltalk imageFromFileNamed:'UIPainter.xbm' forClass:self class. + icon := self class builderIcon. topView := self window.