EWorldIconLibrary.st
author Jan Vrany <jan.vrany@labware.com>
Sat, 30 Sep 2023 22:55:25 +0100
branchjv
changeset 19648 5df52d354504
parent 15950 23be8cf85415
permissions -rw-r--r--
`TestRunner2`: do not use `#keysAndValuesCollect:` ...as semantics differ among smalltalk dialects. This is normally not a problem until we use code that adds this as a "compatibility" method. So to stay on a safe side, avoid using this method.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
9976
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     1
"
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     2
 COPYRIGHT (c) 2005 by eXept Software AG
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     3
              All Rights Reserved
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     4
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     5
 This software is furnished under a license and may be used
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     6
 only in accordance with the terms of that license and with the
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     7
 inclusion of the above copyright notice.   This software may not
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     8
 be provided or otherwise made available to, or used by, any
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     9
 other person.  No title to or ownership of the software is
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    10
 hereby transferred.
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    11
"
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    12
"{ Package: 'stx:libtool' }"
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    13
15950
23be8cf85415 Bugfix in merge tool.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 15566
diff changeset
    14
"{ NameSpace: Smalltalk }"
23be8cf85415 Bugfix in merge tool.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 15566
diff changeset
    15
9976
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    16
XPToolbarIconLibrary subclass:#EWorldIconLibrary
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    17
	instanceVariableNames:''
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    18
	classVariableNames:''
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    19
	poolDictionaries:''
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    20
	category:'Interface-Smalltalk'
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    21
!
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    22
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    23
!EWorldIconLibrary class methodsFor:'documentation'!
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    24
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    25
copyright
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    26
"
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    27
 COPYRIGHT (c) 2005 by eXept Software AG
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    28
              All Rights Reserved
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    29
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    30
 This software is furnished under a license and may be used
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    31
 only in accordance with the terms of that license and with the
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    32
 inclusion of the above copyright notice.   This software may not
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    33
 be provided or otherwise made available to, or used by, any
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    34
 other person.  No title to or ownership of the software is
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    35
 hereby transferred.
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    36
"
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    37
!
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    38
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    39
documentation
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    40
"
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    41
     Unfinished - Under construction.
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    42
14894
cc3aeba7791b comment/format in: #documentation
Claus Gittinger <cg@exept.de>
parents: 9976
diff changeset
    43
    This is a style specific icon library for a fun look.
cc3aeba7791b comment/format in: #documentation
Claus Gittinger <cg@exept.de>
parents: 9976
diff changeset
    44
cc3aeba7791b comment/format in: #documentation
Claus Gittinger <cg@exept.de>
parents: 9976
diff changeset
    45
    Never access this iconlibrary directly from an application -
cc3aeba7791b comment/format in: #documentation
Claus Gittinger <cg@exept.de>
parents: 9976
diff changeset
    46
    always use ToolbarIconLibrary, which is an alias to one of the style specific
cc3aeba7791b comment/format in: #documentation
Claus Gittinger <cg@exept.de>
parents: 9976
diff changeset
    47
    icon libs.
cc3aeba7791b comment/format in: #documentation
Claus Gittinger <cg@exept.de>
parents: 9976
diff changeset
    48
9976
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    49
     ToolbarIconLibrary := EWorldIconLibrary
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    50
     ToolbarIconLibrary := XPToolbarIconLibrary
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    51
     ToolbarIconLibrary := VistaToolbarIconLibrary
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    52
"
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    53
! !
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    54
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    55
!EWorldIconLibrary class methodsFor:'image specs'!
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    56
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    57
editor32x32Icon
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    58
    "This resource specification was automatically generated
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    59
     by the ImageEditor of ST/X."
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    60
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    61
    "Do not manually edit this!! If it is corrupted,
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    62
     the ImageEditor may not be able to read the specification."
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    63
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    64
    "
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    65
     self editor32x32Icon inspect
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    66
     ImageEditor openOnClass:self andSelector:#editor32x32Icon
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    67
     Icon flushCachedIcons
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    68
    "
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    69
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    70
    <resource: #image>
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    71
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    72
    ^Icon
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    73
        constantNamed:#'EWorldIconLibrary class editor32x32Icon'
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    74
        ifAbsentPut:[(Depth8Image new) width: 32; height: 32; photometric:(#palette); bitsPerSample:(#[8]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    75
@0LC@0LC@0LC@0LC@0LC@0LC@0LC@0LC@1HREAPR@0LC@0LC@0LC@0LC@0LC@0LC@0LC@0LC@0LRD!!8EC1PC@0LC@0LC@0LC@0LC@0LC@0LC@0LC@1HRD!!XV
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    76
C0TEE0LC@0LC@0LC@0LC@0LC@1HRD!!HRD!!PTB0,RFP0^AP<T@0LC@1HRD!!HRD!!HRD!!PTE@,VE!!$LC@@PBA4VGA$VEAHC@0LCEA\VE  HF@PLC@0@@A0PDA@P
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    77
GAXNEQTVAA$R@0LC@0LTC@@@@@@@@@@@@@@@GA0\D@@VBQTUA!!TRD!!HC@0LC@1HL@@@@@@@@@@@@GA0\GA@@B0$FEQTIF1HC@0LC@0LCD!! @@@@@@@@@GA0\
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    78
GA0PGAXBA XUC!!XVD LC@0LC@0LRB@@@@@@@GA0\GA0PDA@LA1DAEQXXDPPR@0LC@0LC@1HV@@@@GA0\GA0PDA@PB!!XYDQ(VCADQCAHC@0LC@0LCD ,\GA0\
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    79
GA0PDA@PD@(GD!!PYC@(QDQDGD LC@0LC@0LRE@@\GA0PDA@PDA@PCQ(DB 4QDQDQDQ0R@0LC@0LC@0LT@A@PDA@PDA@PB (JCQDQDQDQDQDQDQPC@0LC@0LC
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    80
@1HZDA@PDA@PB (QDP4QDQDQDQDQDQDQEAHC@0LC@0LCD 0PDA@PB (QDP4QDQDQDQDQDQDQDQDVD LC@0LC@0LRA@4PB (QDP4QDQDQDQDQDQDQDQDQDQ$R
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    81
@0LC@0LC@1HYCP(QDQDQDQDQDQDQDQDQDQDQDQDQCAHC@0LC@0LCD!!XQDP4QDQDQDQDQDQDQDQDQDQDQDQDGD LC@0LC@0LRE!!DQDQDQDQDQDQDQDQDQDQDQ
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    82
DQDQDP(R@0LC@0LC@1HKDQDQDQDQDQDQDQDQDQDQDQDJB (QDQPC@0LC@0LC@1PQDQDQDQDQDQDQDQDQDQDVE!!$YBA$YEAHC@0LC@0LCE@(QDQDQDQDQDQDQ
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    83
DQDQDP0HDA@PDA@TD LC@0LC@0LRGADQDQDQDQDQDQDQDQDQDQXPDA@PCAPC@0LC@0LC@1H\DQDQDQDQDQDQDQDQDQDQF  PDA@VD LC@0LC@0LCD \QDQDQ
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    84
DQDQDQDQDQDQDQDQE!!@PCAHC@0LC@0LC@0LRCADQDQDQDQDQDQDQDQDQDQDVDA@TD LC@0LC@0LC@1HDDQDQDQDQDQDQDQDQDQDQDQ$SEAHC@0LC@0LC@0LC
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    85
D!!$QDQDQDQDQDQDQDQDQDQDQE!!PR@0LC@0LC@0LC@0LRE!!DQDQDQDQDQDQDQDP(\F 0TD LC@0LC@0LC@0LC@1HKDQDQDQ0ZCA$VE!!PTEAHRD!!HC@0LC@0LC
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    86
@0LC@0LC@1PVB1PTD!!HRD!!HR@0LC@0LC@0LC@0LC@0LC@0@a') ; colorMapFromArray:#[212 159 170 255 255 170 212 191 85 202 226 255 132 132 132 255 95 85 255 255 85 188 187 187 85 95 170 212 159 85 221 221 221 68 68 68 168 159 167 255 204 255 170 159 85 212 95 85 204 204 255 255 253 247 0 0 0 170 159 255 34 34 34 255 191 85 85 90 85 85 63 85 170 95 170 118 118 117 170 170 170 42 63 0 207 204 196 170 95 85 170 63 85]; mask:((Depth1Image new) width: 32; height: 32; photometric:(#blackIs0); bitsPerSample:(#[1]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    87
@@@@_@@@@O0@@@_<@@_??C????0????8O???>C???>@???? O???8C???>@???? O???8A???>@_???0G???<A????@_???0G???<A????@_???0C???>@??
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    88
?? O???0C???<@???>@O??? C???0@???8@O??<@C??>@@_?@@@b') ; yourself); yourself]
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    89
!
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    90
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    91
imageEditor32x32Icon2
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    92
    "This resource specification was automatically generated
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    93
     by the ImageEditor of ST/X."
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    94
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    95
    "Do not manually edit this!! If it is corrupted,
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    96
     the ImageEditor may not be able to read the specification."
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    97
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    98
    "
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    99
     self imageEditor32x32Icon2 inspect
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   100
     ImageEditor openOnClass:self andSelector:#imageEditor32x32Icon2
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   101
     Icon flushCachedIcons
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   102
    "
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   103
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   104
    <resource: #image>
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   105
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   106
    ^Icon
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   107
        constantNamed:#'EWorldIconLibrary class imageEditor32x32Icon2'
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   108
        ifAbsentPut:[(Depth8Image new) width: 32; height: 32; photometric:(#palette); bitsPerSample:(#(8)); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   109
@@@@@@@@@@@@@@@@@@@@NS$9NS$9NS$9NS$9@  B@#$@@@@@@@@@@@@@@@@@@@@9NS$9NS$9NS$9@ H G3 BNP@@@@@@@@@@@@@@@@@@@C$9NS$9NS$@@ HO
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   110
AR$_G2@9@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@EB@(JKQ<)BC$@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@(.IP8EH@ BNP@@@@@@@@@@@@@@@@@@@@@@@@@G
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   111
C ,IMA(#BPXI@#$9@@@@@@@@@@@@@@LGC 4FB $EFA0XBBLZF"<#B@HBNS$@@@@@@@4IBPTXFA ]GR,''D1LLD0<(IA(ZJBXBNS$9NP@@@@@@AS@3KALSD00L
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   112
C@0LC@0EMRP$F#DH@#$9NS$9@@@@@@@FJ1LSD00LC@0LC@0YF0,AL!!(%CP@@NS$9NS$@@@@@@@,]CALSH!!0\C@0LDA$XB \FDPX@@@@@@C$9NP@@@@@@A14L
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   113
CA J@0,EDA$YM HTBP4[A @@@@@@NS$9@@@@@@@@G@0"B DA@PX"FQ$KA!!$A@P8J@@@@@@@9NS$@@@@@@@@JI0TA@PDA@P<P@PDA@PDA@0$@@@@@@C$9NP@@
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   114
@@@@@@XXA DA@PDACP(A@PDACP$IAP@@@@@@NS$9@@@@@@@@B0 NA ,AB XAC0LA@P(!!EQ8V@@@@@@@9NS$@@@@@@@@GB@<QCP8OAP$TCPDKHPPDAAX@@@@@
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   115
@C$9NP@@@@@@@@@QF0XEAP,NB04I@1XUA@PDE \@@@@@NS$9@@@@@@@@@@T7C $MA0\G@0(ED PDA@PRC @@@@@9NS$@@@@@@@@@BP,GDA@C@0LAC"XUA@PD
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   116
AAHK@@@@@C$9NP@@@@@@@@@JCP\C@04JA 8JD PDA@PDJ 4@@@@@NS$9@@@@@@@@@@XF@PLIE!!HRD!!HDA@PDEQT^BP@@@@@9NS$@@@@@@@@@CP(ABQ8DA@PD
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   117
A@PDA@PRD TE@@@@@C$9NP@@@@@@@@@NBP4RA@PDA@PUEQTRD!!HRC0,@@@@@NS$9@@@@@@@@@@@TE!!T*G!!XVE"TEBPXMB0,@@@@@@@@9NS$@@@@@@@@@@@<T
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   118
DPTJA ,G@@@@@@@@@@@@@@@@NS$9NP@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@C$9NS$9@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@9NS$9NS$9
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   119
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@C$9NS$9NS$@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@NS$9NS$9NP@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@9
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   120
NS$9NS$9@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@C$9NP@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   121
@@@@@@@@@@@@') ; colorMapFromArray:#[0 0 0 255 255 255 17 17 17 238 238 238 102 255 51 102 102 102 153 153 153 221 221 221 34 34 34 119 119 119 136 136 136 187 187 187 153 204 255 170 170 170 204 204 204 85 85 85 204 204 255 68 68 68 51 153 51 102 204 255 51 51 51 102 204 51 51 102 51 255 204 255 51 102 102 204 255 255 255 204 51 153 153 204 102 102 153 51 102 153 51 153 0 255 102 102 102 51 51 51 102 0 102 153 153 204 153 51 255 255 102 102 102 51 51 51 0 102 153 204 204 204 51 204 102 102 102 153 51 51 153 204 51 204 255 153 51 51 153 102 0 255 255 51 0 153 204 153 102 51 255 255 153 51 153 255 153 153 51 204 204 102 153 204 204 204 153 204 153 102 102 0 0 0]; mask:((ImageMask new) width: 32; height: 32; photometric:(#blackIs0); bitsPerSample:(#[1]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   122
@@@@G @@@G8@@@G>@@@A? @@@_8@@A?<@C???@_???@G??? A??? @_??0@G??<@@???@@O??0@C??<@@???@@O??0@A??>@@_?? @G??8@A??>@@_?? @G?
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   123
?8@A??>@@O?>@@C?@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@b') ; yourself); yourself]
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   124
! !
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   125
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   126
!EWorldIconLibrary class methodsFor:'image specs-32x32'!
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   127
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   128
fileBrowser32x32Icon
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   129
    "This resource specification was automatically generated
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   130
     by the ImageEditor of ST/X."
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   131
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   132
    "Do not manually edit this!! If it is corrupted,
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   133
     the ImageEditor may not be able to read the specification."
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   134
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   135
    "
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   136
     self fileBrowser32x32Icon inspect
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   137
     ImageEditor openOnClass:self andSelector:#fileBrowser32x32Icon
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   138
     Icon flushCachedIcons
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   139
    "
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   140
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   141
    <resource: #image>
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   142
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   143
    ^Icon
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   144
        constantNamed:#'EWorldIconLibrary class fileBrowser32x32Icon'
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   145
        ifAbsentPut:[(Depth8Image new) width: 32; height: 32; photometric:(#palette); bitsPerSample:(#(8)); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   146
HRD!!HRD!!HRD!!HRD!!HRD!!HPHB@"DB@"D!!HRD!!HRD!!HRD!!HRD!!HRD!!HRD!!HRD!!HPHB@ \Q@ T[C H!!HRD!!HRD!!HRD!!HRD!!HRD!!HRDBHPHB@ 8BA00RAQ4SGPHB
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   147
HRD!!HRD!!HRDB@ H!!HRDBHPHB@ TEB@(ECA$LD@\ID0\B@"D!!HRD!!HPHEDP8B@ HBC!!DNB@LMCPXID!!$QB!!POF1LE@ H!!HRD!!@!!@LCADEA04ED 0PCPLFA0(O
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   148
DQHO@PLABQLSC HBHRDBD@0LCA\ED1TSDP0RBP<PD@<JBQ PC0,CA $_A0H!!HPHPC@0LE0<ABQLUBQDWDR@LD $F@P$PC0DKA0 OARDB@!!@LC@0WBP,CB $M
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   149
D0<RC@0YDP\FAADRC \OA PGHPTHAQ0LC@0\B@(C@04HEP$PC@0QA 4IAP J@PPA@P\!!A0LABQ@RC@0VG!!@MB1POD1THCADGB@$FA@PAA@PAARDGB0LC@P$Z
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   150
E 0LE!! P@PLIEP GA0<AA@DA@PPJB DEHP\KC0DC@0DHF!!XLCAHO@0 EBP(AA@DA@PPFA0HI@PT!!A1PNA0<D@0,JDA VG TIC0XD@PDAA@PJA08ECPDAC"DG
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   151
B0TJA@$ME@LKCPTHB DD@PDAA@DJB@8GCPDD@PDNHP\KAP(C@0XIB!!PCB@XD@PDDA@XOAPTIA PD@PDAA 8!!A0,GB LC@0LIAP,IA DD@P(H@ 8O@PPA@PDA
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   152
@PDF@"DGB0\M@0LC@0(EB0$F@P4E@ TM@PPA@PDA@PPA@P(BHP\KA $J@0LCB TKB@XAAPTM@PPA@PDA@PPACP AB H!!A0,CB04IA@LJA0,IA DF@PPA@PDA
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   153
@PPAC0TNBPPJ@"DEB0LC@0PIB 4GB0 F@PDA@PDAA@PFBPTEC0XDA@4BHPTK@0LC@0LJAP KB@XA@PDAA@DJB@TGCPDD@PDDCPH!!A0LC@0LC@0LTE@,HA DA
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   154
A@XOAP8HA PD@PDA@PPM@"DN@PLC@0LC@0LCB0 F@P(HC 8OA PA@PDA@PPAB \BHPHNCP,C@0LC@0LKB@XDB@8O@PPA@PDA@PPACP\B@"D!!HRDBA1PC@0LC
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   155
@0,HA DF@PPA@PDA@PPFC0TB@"D!!HRD!!HRDBC 4C@0LCB0 F@PDA@PDAA@PJB@8B@"D!!HRD!!HRD!!HRDB@  T@0LKB@XA@PDAA@DJB@HB@"D!!HRD!!HRD!!HRD!!
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   156
HRD!!@ 8A@0,HA DAA@DMAPHBHRD!!HRD!!HRD!!HRD!!HRD!!HRD!!@ HMB0 AA@XOAPHBHRD!!HRD!!HRD!!HRD!!HRD!!HRD!!HRD!!HPHIB@(IC HBHRD!!HRD!!HRD!!HRD!!
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   157
HRD!!HRD!!HRD!!HRD!!HPHBC HBHRD!!HRD!!HRD!!HRD!!HRD!!HP@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   158
@@@@@@@@@@@@') ; colorMapFromArray:#[0 0 0 187 187 187 17 17 17 255 255 255 204 204 204 51 51 51 170 170 170 68 68 68 85 85 85 102 102 102 153 153 153 238 238 238 255 255 153 136 136 136 34 34 34 119 119 119 102 102 51 153 153 102 204 204 102 102 102 153 221 221 221 153 153 204 255 204 102 255 255 102 153 153 51 255 255 204 153 102 51 51 102 102 204 153 102 51 51 102 204 153 51 153 204 255 204 204 153 0 0 0]; mask:((ImageMask new) width: 32; height: 32; photometric:(#blackIs0); bitsPerSample:(#[1]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   159
@@C,@@@C?0@@K??@NK??<C????0?????O????3????=?????_????7????=?????_????7????=?????_????7????=?????_????7????=?????_????7??
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   160
??=?????_????!!???? O??? A??? @G??@@@??@@@C?@@@@_@@@b') ; yourself); yourself]
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   161
!
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   162
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   163
fileSave32x32Icon
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   164
    "This resource specification was automatically generated
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   165
     by the ImageEditor of ST/X."
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   166
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   167
    "Do not manually edit this!! If it is corrupted,
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   168
     the ImageEditor may not be able to read the specification."
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   169
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   170
    "
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   171
     self fileSave32x32Icon inspect
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   172
     ImageEditor openOnClass:self andSelector:#fileSave32x32Icon
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   173
     Icon flushCachedIcons
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   174
    "
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   175
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   176
    <resource: #image>
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   177
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   178
    ^Icon
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   179
        constantNamed:#'EWorldIconLibrary class fileSave32x32Icon'
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   180
        ifAbsentPut:[(Depth8Image new) width: 32; height: 32; photometric:(#palette); bitsPerSample:(#(8)); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   181
E1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\GA0\GA0\GBP$IBP$IBP$IBP$IA0$P
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   182
D@$GE1\WE1\WA1@VEALMC (JA@HB@ HEAPTA@PDODQDQD \WE1\WA0$KA!!TH@ HB@ HEAPTE@PDA@PDA@P4QEAPRBQ\WE1\ID XFEP,D@ HB@ TEAPDA@PDA
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   183
@PDAB!!DHB0XPA1\WE1@FA XFB0PBA@PDA@PDA@PDB (D@PDDB@XFA!!PGE1\WD@XFA XKA@PMCP4MCP8NC (JB PA@PTKA XCB0\WE1\PA XFA ,D@ HBAPTE
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   184
@PDA@PDA@PDA@P FA LHA1\WE1@FA XFB0PBAPTE@PDA@PDA@PDA@PDAB@XC@0 GE1\WD@XFA XKA@HB@ HB@ PDA@(JC (A@PDHA LCDP\WE1\PA XFA ,D
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   185
AP8MCP8NC (JB PBAPDA@P<R@0LRA1\WE1@FA LCB@(EAPTE@PDA@PDA@PDA@PDAD1HC@1HGE1\WD@XC@0LHB DA@PDA@PDA@PDA@PTBA@8KCPLCCP\WE1\P
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   186
A LC@1DOB (JB 8MCQLOB@ HB@ QDQLC@0LFA1\WE1@C@0LCA!!DHDQDQC1HRCPXF@0LC@0LC@0LC@0XGE1\WBPXC@0LCC@LCA XFCQHRDQDQB@ HB@ K@0LC
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   187
A $WE1\IA LC@0XHB0,KB0 OC1LMC 8D@ TEAP F@0LCBQ\WE0$C@0LCC0 JB PD@ HEAPTEAPPNC PAC04DA@LIE1\WBPLC@0POD0PDA@PB@ HB@ TJE@<H
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   188
D0DSD 0D@1@WE1\I@0LCC@<SA@PD@ HB@ HEAP(HA@8O@P4OC@PJDA\WE0$CA@LLD!!LBA@PB@ HB@ TEA@ DC <ACQDLA@PTE1\WBPLDA@0RC0HD@ HB@ HE
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   189
APTBB0(NC0DNC00DAAPWE1\I@0PDCAHO@ HB@ HBAPTEAPHKB 8H@P(HC@PLEA\WE0$CA@PLD0<B@ HB@ HEAPTEAP JB  AA@ LC@0KE1\WBPXLA@0MC0HB
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   190
@ HBAPTEAPDEB@(JB0DBB@0LC@,WE1\GA 0DC@4H@ HB@ HEAPTE@PDHB0,K@PTHC@0LB1\WE0\FC@0LA  E@ TEAPDA@PDA@PHD@ TA@ ,MD0 IE1\WA04L
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   191
A@PFB0(NC 4MCQLSC0 HB0,TD@$IA0\GA0\WE1\GDAPPBP$GA0\GA0\GA0\GA0\GA0\WE1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\W
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   192
E1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\WE1\WE0@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   193
@@@@@@@@@@@@') ; colorMapFromArray:#[0 0 0 255 255 255 221 221 221 204 153 204 204 204 204 238 238 238 153 153 204 17 17 17 102 102 102 34 34 34 187 187 187 85 85 85 204 204 255 153 153 153 170 170 170 119 119 119 51 51 51 102 102 153 153 102 153 136 136 136 68 68 68 153 102 204 51 51 102 0 0 0]; mask:((ImageMask new) width: 32; height: 32; photometric:(#blackIs0); bitsPerSample:(#[1]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   194
@@@@@@@@@@@O???8G???>G????!!????<_????G????1????<_????G????1????<_????G????1????<_????G????1????<_????G????1????<_????G??
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   195
??1????<_????G????1????<_????G????1???0@@@@@@@@@@@@b') ; yourself); yourself]
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   196
!
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   197
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   198
imageEditor32x32Icon
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   199
    "This resource specification was automatically generated
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   200
     by the ImageEditor of ST/X."
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   201
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   202
    "Do not manually edit this!! If it is corrupted,
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   203
     the ImageEditor may not be able to read the specification."
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   204
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   205
    "
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   206
     self imageEditor32x32Icon inspect
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   207
     ImageEditor openOnClass:self andSelector:#imageEditor32x32Icon
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   208
     Icon flushCachedIcons
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   209
    "
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   210
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   211
    <resource: #image>
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   212
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   213
    ^Icon
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   214
        constantNamed:#'EWorldIconLibrary class imageEditor32x32Icon'
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   215
        ifAbsentPut:[(Depth8Image new) width: 32; height: 32; photometric:(#palette); bitsPerSample:(#(8)); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   216
NS$9NS$9NS$9NS$9NS$9NS$9NS$9NS$9NS$9@  B@#$9NS$9NS$9NS$9NS$9NS$9NS$9NS$9NS$9@ H G3 BNS$9NS$9NS$9NS$9NS$9NS$9NS$9NS$B@ HO
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   217
AR$_G2@9NS$9NS$9NS$9NS$9@ HB@ HB@ HHBADEB@(JKQ<)BC$9NPHB@ HB@ HBBAPQC0TJA 4KA0LA@P(.IP8EH@ BNS$9B@TJA 4KC \C@PDA@PDA@PDG
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   218
C ,IMA(#BPXI@#$9NS$T@PDA@PDA@PLGC 4FB $EFA0XBBLZF"<#B@HBNS$9NP G@P4IBPTXFA ]GR,''D1LLD0<(IA(ZJBXBNS$9NS$9@ ,AAS@3KALSD00L
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   219
C@0LC@0EMRP$F#DH@#$9NS$9NS$BA DFJ1LSD00LC@0LC@0YF0,AL!!(%CPTBNS$9NS$9NPHI@P,]CALSH!!0\C@0LDA$XB \FDPXAB H9NS$9NS$9@ <AA14L
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   220
CA J@0,EDA$YM HTBP4[A DF@#$9NS$9NS$BE@DAG@0"B DA@PX"FQ$KA!!$A@P8J@P,BNS$9NS$9NS$H@0DJI0TA@PDA@P<P@PDA@PDA@0$AC H9NS$9NS$9
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   221
NPHN@PXXA DA@PDACP(A@PDACP$IAPDCBC$9NS$9NS$9@ ,AB0 NA ,AB XAC0LA@P(!!EQ8V@PDTNS$9NS$9NS$BA DGB@<QCP8OAP$TCPDKHPPDAAXA@P<B
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   222
NS$9NS$9NPHI@PLQF0XEAP,NB04I@1XUA@PDE \ABPH9NS$9NS$9@!!DA@PT7C $MA0\G@0(ED PDA@PRC DF@#$9NS$9NS$9B@DABP,GDA@C@0LAC"XUA@PD
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   223
AAHK@P,BNS$9NS$9NS$BA0DJCP\C@04JA 8JD PDA@PDJ 4AA0H9NS$9NS$9NPHK@PXF@PLIE!!HRD!!HDA@PDEQT^BPLGBC$9NS$9NS$9@ XACP(ABQ8DA@PD
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   224
A@PDA@PRDPTEAPTH@#$9NS$9NS$BBPDNBP4RA@PDA@PUEQTRD"DODA@PF0H9NS$9NS$9NPHO@P\TE!!T*G!!XVE"TEBPXMB0TPDA@O@#$9NS$9NS$9@!!PC@0<T
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   225
DPTJA ,G@PDA@PDACP(CF0H9NS$9NS$9NS$9B@8C@0\C@0DA@PDA@PDA@PDNGA,H@#$9NS$9NS$9NS$BB1\CE1\C@0LC@0LA@PDA@P\QB@H9NS$9NS$9NS$9
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   226
NPHFE0\G@0LCE0LC@PDA@PLCCPHBNS$9NS$9NS$9NS$9@ (WA0\GE0LC@0\KA $ODP B@#$9NS$9NS$9NS$9NS$BAQ\PD@8MB TQB@HB@ HBNS$9NS$9NS$9
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   227
NS$9NS$9NPHTC1DTB@HB@ H9NS$9NS$9NS$9NS$9NS$9NP@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   228
@@@@@@@@@@@@') ; colorMapFromArray:#[0 0 0 255 255 255 17 17 17 238 238 238 102 255 51 102 102 102 153 153 153 221 221 221 34 34 34 119 119 119 136 136 136 187 187 187 153 204 255 170 170 170 204 204 204 85 85 85 204 204 255 68 68 68 51 153 51 102 204 255 51 51 51 102 204 51 51 102 51 255 204 255 51 102 102 204 255 255 255 204 51 153 153 204 102 102 153 51 102 153 51 153 0 255 102 102 102 51 51 51 102 0 102 153 153 204 153 51 255 255 102 102 102 51 51 51 0 102 153 204 204 204 51 204 102 102 102 153 51 51 153 204 51 204 255 153 51 51 153 102 0 255 255 51 0 153 204 153 102 51 255 255 153 51 153 255 153 153 51 204 204 102 153 204 204 204 153 204 153 102 102 0 0 0]; mask:((ImageMask new) width: 32; height: 32; photometric:(#blackIs0); bitsPerSample:(#[1]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   229
@@@@G @@@G8@@@O>@@???#????8????<O????C????@???? O???8C???>@???? O???8A???>@_??? G???8A????@_???0G???<@????@O???0C???<@??
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   230
?? O???0C???<@???>@G??? A???0@_??8@G??<@A??8@@_>@@@b') ; yourself); yourself]
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   231
! !
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   232
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   233
!EWorldIconLibrary class methodsFor:'image specs-tools-Launcher'!
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   234
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   235
saveImageIcon
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   236
    <resource: #programImage>
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   237
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   238
    ^ self fileSave32x32Icon
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   239
!
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   240
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   241
startFileBrowserIcon
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   242
    <resource: #programImage>
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   243
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   244
    ^ self fileBrowser32x32Icon
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   245
!
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   246
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   247
startImageEditorIcon
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   248
    <resource: #programImage>
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   249
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   250
    ^ self imageEditor32x32Icon2
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   251
!
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   252
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   253
startNewFileBrowserIcon
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   254
    <resource: #programImage>
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   255
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   256
    ^ self fileBrowser32x32Icon
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   257
! !
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   258
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   259
!EWorldIconLibrary class methodsFor:'documentation'!
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   260
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   261
version_CVS
14894
cc3aeba7791b comment/format in: #documentation
Claus Gittinger <cg@exept.de>
parents: 9976
diff changeset
   262
    ^ '$Header: /cvs/stx/stx/libtool/EWorldIconLibrary.st,v 1.2 2014-11-23 13:56:47 cg Exp $'
9976
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   263
!
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   264
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   265
version_SVN
14894
cc3aeba7791b comment/format in: #documentation
Claus Gittinger <cg@exept.de>
parents: 9976
diff changeset
   266
    ^ '$Id: EWorldIconLibrary.st,v 1.2 2014-11-23 13:56:47 cg Exp $'
9976
ad8e9894b042 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   267
! !
14894
cc3aeba7791b comment/format in: #documentation
Claus Gittinger <cg@exept.de>
parents: 9976
diff changeset
   268