#UI_ENHANCEMENT by cg
authorClaus Gittinger <cg@exept.de>
Fri, 17 Mar 2017 13:25:25 +0100
changeset 17477 ebed6ccbc087
parent 17476 de380a84914e
child 17478 f02e9da087b3
#UI_ENHANCEMENT by cg class: InspectorView added: #imageFor_collections_empty changed: #iconForValue: #imageFor_arrays #imageFor_collectionHolder #imageFor_collections #imageFor_dictionaries #imageFor_fractions #imageFor_sequenceableCollections
InspectorView.st
--- a/InspectorView.st	Fri Mar 17 12:00:21 2017 +0100
+++ b/InspectorView.st	Fri Mar 17 13:25:25 2017 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
               All Rights Reserved
@@ -411,38 +409,27 @@
 !InspectorView class methodsFor:'image specs'!
 
 imageFor_arrays
-    <resource: #image>
     "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 imageFor_arrays inspect
      ImageEditor openOnClass:self andSelector:#imageFor_arrays
-     Icon flushCachedIcons"
-    
-    ^ Icon constantNamed:'InspectorView class imageFor_arrays'
-        ifAbsentPut:[
-            (Depth8Image new)
-                width:16;
-                height:16;
-                photometric:(#palette);
-                bitsPerSample:(#[ 8 ]);
-                samplesPerPixel:(1);
-                bits:(ByteArray 
-                            fromPackedString:'
-@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@A@T5EQT4@@@@@@@@@@@@AOTUAPBU@IS0@@@@@@@@AOTP%PBUAQ
-T %O@@@@@@@@T0$IBP$ITUHIO0@@@@@@@EEPBU@ITUIRBSD@@@@@@@AQBP$IBP%RO0$1@@@@@@@@T5HIT %RO3DIO0@@@@@@@D=RT%HILSEJBR<@@@@@@@@@
-S3D1LP%JBR<@@@@@@@@@@@AOO3D1O2<@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@a');
-                colorMapFromArray:#[ 226 226 226 176 176 176 155 155 155 169 169 169 152 152 152 164 164 164 149 149 149 192 192 192 240 240 240 255 255 255 202 202 202 201 201 201 151 151 151 162 162 162 148 148 148 158 158 158 173 173 173 154 154 154 167 167 167 150 150 150 160 160 160 180 180 180 156 156 156 170 170 170 153 153 153 165 165 165 183 183 183 0 0 0 227 231 0 132 132 0 151 156 0 142 131 128 255 252 49 175 181 0 255 234 140 218 222 0 251 255 33 74 74 0 94 99 0 107 107 0 143 148 0 189 189 0 87 90 0 251 255 8 247 255 16 167 173 0 206 99 132 156 74 99 206 66 107 115 16 49 255 16 90 189 0 57 132 16 49 206 0 57 198 123 140 255 49 123 255 33 99 222 0 66 99 0 24 239 0 66 255 0 74 255 140 214 148 0 41 140 49 74 198 123 148 255 0 82 90 0 24 132 0 41 206 99 123 156 0 41 198 0 57 74 0 24 255 16 82 214 0 66 90 0 33 189 0 49 107 0 33 206 16 74 214 8 66 218 112 214 255 0 255 208 32 144 199 21 133 186 85 211 ];
-                mask:((ImageMask new)
-                            width:16;
-                            height:16;
-                            bits:(ByteArray 
-                                        fromPackedString:'@@@@@@@@A>@O<A?8G? _>A?8G? _>@?0A>@@@@@@@@@b');
-                            yourself);
-                yourself
-        ]
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'InspectorView class imageFor_arrays'
+        ifAbsentPut:[(Depth4Image width:16 height:16) bits:(ByteArray fromPackedString:'
+H"H"H"H"H"H"H"H"H"H"H"H"H"H"H"H"H"H&*H)"H"H"H!! 3@0D"H"H!! C@8PAH"H"(@@@!!@\"H"JC@0!!DARH"H(@@@D\EH"H")@PD]P\"H"HTQ@U[BRH"H"
+EUTKBRH"H"H!!]U^RH"H"H"H"H"H"H"H"H"H"H"H"H"H"H"H"H"Hb')
+            colorMapFromArray:#[255 255 255 218 112 214 226 226 226 255 0 255 199 21 133 115 16 49 198 123 148 140 49 74 208 32 144 156 74 99 186 85 211 90 0 33]
+            mask:((ImageMask width:16 height:16) bits:(ByteArray fromPackedString:'@@@@@@@@A>@O<A?8G? _>A?8G? _>@?0A>@@@@@@@@@b'); yourself); yourself]
 !
 
 imageFor_characters
@@ -531,46 +518,60 @@
     <resource: #image>
 
     ^Icon
-        constantNamed:'InspectorView imageFor_collectionHolder'
-        ifAbsentPut:[(Depth8Image new) width:16; height:16; bits:(ByteArray fromPackedString:'
-C@0LC@ HB@ HB@ HC@0LC@0LC@0HB@ HB@ HB@0LC@0LC@ HB@ HB@ HB@ HB@0LC@0HB@ 0M#P4M#@HB@ LC@0LB@ 2ACL3L3LDL  HC@0LC@ 2ACL3L3L4
-MPP2B@0LC@0HM P3L3L3MCTDK0 LC@0LBCPDL3L3MCT5AB8HC@0LC@ 4ACLDMSPDK0P.B@0LC@0HM P5MST5K28DK0 LC@0LBCHDMST5K"81AB4HC@0LC@ H
-L P.K"81AB4HB@0LC@0HB@ 2K28.K24HB@ LC@0LB@ HB@ HB@ HB@ HC@0LC@0LB@ HB@ HB@ LC@0LC@0LC@ HB@ HB@ HC@0LC@@a') ; colorMapFromArray:#[0 0 0 74 74 0 94 99 0 240 240 240 255 255 255 132 132 0 143 148 0 142 131 128 226 226 226 151 156 0 107 107 0 87 90 0 60 59 55 230 230 230 206 173 99 156 131 74 206 165 66 115 82 16 255 181 16 189 132 0 132 99 16 206 149 0 198 181 123 255 181 49 222 156 0 99 75 0 239 173 0 255 181 0 148 107 0 140 115 49 198 173 123 255 173 0 90 66 0 132 91 0 206 182 99 156 115 0 198 141 0 74 50 0 255 189 16 214 148 0 90 57 0 189 140 0 107 74 0 206 148 16 214 156 8 156 74 99 115 16 49 140 49 74 198 123 148 90 0 33 218 112 214 255 0 255 208 32 144 199 21 133 186 85 211]; mask:((ImageMask new) width:16; height:16; bits:(ByteArray fromPackedString:'<@?0C<@C1>OO<=?;7?/_>=?;7?/_><?31>O@@?@O<@<b') ; yourself); yourself]
+        constantNamed:'InspectorView class imageFor_collectionHolder'
+        ifAbsentPut:[(Depth4Image width:16 height:16) bits:(ByteArray fromPackedString:'
+&Y$"H"H"&Y&Y&RH"H"JY&Y$"H"H"H"JY&RH U&TBH)&YH!!1DQLD"&Y$!!1DQF#AJY&RWDQDZL()&YI,QDZH12&Y$&1L!!,+GJY&RWH"H)<()&YH\"H];02&Y$"
+GG];02JY&RH!!)7(2H)&YH"H"H"H"&Y&YH"H"H)&Y&Y$"H"H"&Y$b')
+            colorMapFromArray:#[198 123 148 218 112 214 226 226 226 156 74 99 255 0 255 186 85 211 208 32 144 115 16 49 199 21 133 60 59 55 140 49 74 90 0 33 255 255 255]
+            mask:((ImageMask width:16 height:16) bits:(ByteArray fromPackedString:'<@?0C<@C1>OO<=?;7?/_>=?;7?/_><?31>O@@?@O<@<b'); yourself); yourself]
 !
 
 imageFor_collections
-    <resource: #image>
     "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 imageFor_collections inspect
      ImageEditor openOnClass:self andSelector:#imageFor_collections
-     Icon flushCachedIcons"
-    
-    ^ Icon constantNamed:'InspectorView class imageFor_collections'
-        ifAbsentPut:[
-            (Depth8Image new)
-                width:16;
-                height:16;
-                photometric:(#palette);
-                bitsPerSample:(#[ 8 ]);
-                samplesPerPixel:(1);
-                bits:(ByteArray 
-                            fromPackedString:'
-@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@A@T5EQT4@@@@@@@@@@@@AOBUAPTE@IS0@@@@@@@@AOBUAPTEAQ
-T %O@@@@@@@@T0%PTEAPTUHIO0@@@@@@@EDITEAPTUIRBSD@@@@@@@AQBU@IT%DIO0$1@@@@@@@@T0%RT%IRO3DIO0@@@@@@@D<IT%IRLSEJBR<@@@@@@@@@
-S0$1LSEJBR<@@@@@@@@@@@AOO3D1O2<@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@a');
-                colorMapFromArray:#[ 226 226 226 176 176 176 155 155 155 169 169 169 152 152 152 164 164 164 149 149 149 192 192 192 240 240 240 255 255 255 202 202 202 201 201 201 151 151 151 162 162 162 148 148 148 158 158 158 173 173 173 154 154 154 167 167 167 150 150 150 160 160 160 180 180 180 156 156 156 170 170 170 153 153 153 165 165 165 183 183 183 0 0 0 227 231 0 132 132 0 151 156 0 142 131 128 255 252 49 175 181 0 255 234 140 218 222 0 251 255 33 74 74 0 94 99 0 107 107 0 143 148 0 189 189 0 87 90 0 251 255 8 247 255 16 167 173 0 206 99 132 156 74 99 206 66 107 115 16 49 255 16 90 189 0 57 132 16 49 206 0 57 198 123 140 255 49 123 255 33 99 222 0 66 99 0 24 239 0 66 255 0 74 255 140 214 148 0 41 140 49 74 198 123 148 255 0 82 90 0 24 132 0 41 206 99 123 156 0 41 198 0 57 74 0 24 255 16 82 214 0 66 90 0 33 189 0 49 107 0 33 206 16 74 214 8 66 218 112 214 255 0 255 208 32 144 199 21 133 186 85 211 ];
-                mask:((ImageMask new)
-                            width:16;
-                            height:16;
-                            bits:(ByteArray 
-                                        fromPackedString:'@@@@@@@@A>@O<A?8G? _>A?8G? _>@?0A>@@@@@@@@@b');
-                            yourself);
-                yourself
-        ]
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'InspectorView class imageFor_collections'
+        ifAbsentPut:[(Depth4Image width:16 height:16) bits:(ByteArray fromPackedString:'
+H"H"H"H"H"H"H"H"H"H"H"H"H"H"H"H"H"H&*H)"H"H"H!!@3L0D"H"H!!@3L8PAH"H"(CL3!!@\"H"J@L3!!DARH"H(@0R@\EH"H"(DQD]P\"H"HPQDU[BRH"H"
+DEU[BRH"H"H!!]U^RH"H"H"H"H"H"H"H"H"H"H"H"H"H"H"H"H"Hb')
+            colorMapFromArray:#[255 255 255 218 112 214 226 226 226 255 0 255 199 21 133 115 16 49 198 123 148 140 49 74 208 32 144 156 74 99 186 85 211 90 0 33]
+            mask:((ImageMask width:16 height:16) bits:(ByteArray fromPackedString:'@@@@@@@@A>@O<A?8G? _>A?8G? _>@?0A>@@@@@@@@@b'); yourself); yourself]
+!
+
+imageFor_collections_empty
+    "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 imageFor_collections_empty inspect
+     ImageEditor openOnClass:self andSelector:#imageFor_collections_empty
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'InspectorView class imageFor_collections_empty'
+        ifAbsentPut:[(Depth4Image width:16 height:16) bits:(ByteArray fromPackedString:'
+H"H"H"H"H"H"H"H"H"H"H"H"H"H"H"H"H"H&*H)"H"H"H!!@3L0D"H"H!!@3L8PAH"H"(CL3!!@\"H"J@L3!!DARH"H(@3RD\EH"H"(DQD]P\"H"HPQDU[BRH"H"
+DEU[BRH"H"H!!]U^RH"H"H"H"H"H"H"H"H"H"H"H"H"H"H"H"H"Hb')
+            colorMapFromArray:#[255 255 255 218 112 214 226 226 226 255 0 255 199 21 133 115 16 49 198 123 148 140 49 74 208 32 144 156 74 99 186 85 211 90 0 33]
+            mask:((ImageMask width:16 height:16) bits:(ByteArray fromPackedString:'@@@@@@@@A>@O<A?8G? _>A?8G? _>@?0A>@@@@@@@@@b'); yourself); yourself]
 !
 
 imageFor_colors
@@ -609,38 +610,27 @@
 !
 
 imageFor_dictionaries
-    <resource: #image>
     "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 imageFor_dictionaries inspect
      ImageEditor openOnClass:self andSelector:#imageFor_dictionaries
-     Icon flushCachedIcons"
-    
-    ^ Icon constantNamed:'InspectorView class imageFor_dictionaries'
-        ifAbsentPut:[
-            (Depth8Image new)
-                width:16;
-                height:16;
-                photometric:(#palette);
-                bitsPerSample:(#[ 8 ]);
-                samplesPerPixel:(1);
-                bits:(ByteArray 
-                            fromPackedString:'
-@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@A@T5EQT4@@@@@@@@@@@@AOTUAPTEARS0@@@@@@@@AOTU@HTE@I
-BEIO@@@@@@@@T5APBP!!PTUIRO0@@@@@@@EDIBP$I@P$HO3D@@@@@@@AQTUDIBEIRO3D1@@@@@@@@T5IRBEIRBP!!JO0@@@@@@@D=RT%H?LSEJR"<@@@@@@@@@
-S3D1LT(IBB<@@@@@@@@@@@AOO3D1O2<@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@a');
-                colorMapFromArray:#[ 226 226 226 176 176 176 155 155 155 169 169 169 152 152 152 164 164 164 149 149 149 192 192 192 240 240 240 255 255 255 202 202 202 201 201 201 151 151 151 162 162 162 148 148 148 158 158 158 173 173 173 154 154 154 167 167 167 150 150 150 160 160 160 180 180 180 156 156 156 170 170 170 153 153 153 165 165 165 183 183 183 0 0 0 227 231 0 132 132 0 151 156 0 142 131 128 255 252 49 175 181 0 255 234 140 218 222 0 251 255 33 74 74 0 94 99 0 107 107 0 143 148 0 189 189 0 87 90 0 251 255 8 247 255 16 167 173 0 206 99 132 156 74 99 206 66 107 115 16 49 255 16 90 189 0 57 132 16 49 206 0 57 198 123 140 255 49 123 255 33 99 222 0 66 99 0 24 239 0 66 255 0 74 255 140 214 148 0 41 140 49 74 198 123 148 255 0 82 90 0 24 132 0 41 206 99 123 156 0 41 198 0 57 74 0 24 255 16 82 214 0 66 90 0 33 189 0 49 107 0 33 206 16 74 214 8 66 218 112 214 255 0 255 208 32 144 199 21 133 186 85 211 ];
-                mask:((ImageMask new)
-                            width:16;
-                            height:16;
-                            bits:(ByteArray 
-                                        fromPackedString:'@@@@@@@@A>@O<A?8G? _>A?8G? _>@?0A>@@@@@@@@@b');
-                            yourself);
-                yourself
-        ]
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'InspectorView class imageFor_dictionaries'
+        ifAbsentPut:[(Depth4Image width:16 height:16) bits:(ByteArray fromPackedString:'
+L3L3L3L3L3L3L3L3L3L3L3L3L3L3L3L3L3L0Y7XCL3L3L2]UUYH3L3L2]QU]FRL3L3YU4U^Y(3L3M=7]/Q*CL3L7]=FY*HL3L3ZYFY4\(3L3L)&Z"L1CL3L3
+JH#MECL3L3L2*H)CL3L3L3L3L3L3L3L3L3L3L3L3L3L3L3L3L3Lb')
+            colorMapFromArray:#[198 123 148 240 240 240 218 112 214 226 226 226 156 74 99 255 0 255 186 85 211 208 32 144 115 16 49 199 21 133 140 49 74 176 176 176 90 0 33 255 255 255]
+            mask:((ImageMask width:16 height:16) bits:(ByteArray fromPackedString:'@@@@@@@@A>@O<A?8G? _>A?8G? _>@?0A>@@@@@@@@@b'); yourself); yourself]
 !
 
 imageFor_false
@@ -737,38 +727,28 @@
 !
 
 imageFor_fractions
-    <resource: #image>
     "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 imageFor_fractions inspect
      ImageEditor openOnClass:self andSelector:#imageFor_fractions
-     Icon flushCachedIcons"
-    
-    ^ Icon constantNamed:'InspectorView class imageFor_fractions'
-        ifAbsentPut:[
-            (Depth8Image new)
-                width:16;
-                height:16;
-                photometric:(#palette);
-                bitsPerSample:(#[ 8 ]);
-                samplesPerPixel:(1);
-                bits:(ByteArray 
-                            fromPackedString:'
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'InspectorView class imageFor_fractions'
+        ifAbsentPut:[(Depth8Image width:16 height:16) bits:(ByteArray fromPackedString:'
 @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@6LD5MLCX@@@@@@@@@@@ADRTEABS-FQ@@@@@@@@@A@MSH2BP$7
-LTY@@@@@@@@@LCH2L#HIS#D1M@@@@@@@@D4<OC0<BSL1LTH@@@@@@@AML3L3BP$ILSEB@@@@@@@@LCL3L0$3BT\1LP@@@@@@@D@>L3L3BT]GQ2<@@@@@@@@@
-K$03BP$IQ3<@@@@@@@@@@@A@LTIBLR<@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@a');
-                colorMapFromArray:#[ 226 226 226 176 176 176 155 155 155 169 169 169 152 152 152 164 164 164 149 149 149 192 192 192 240 240 240 255 255 255 202 202 202 201 201 201 151 151 151 162 162 162 148 148 148 158 158 158 173 173 173 154 154 154 167 167 167 150 150 150 160 160 160 180 180 180 156 156 156 170 170 170 153 153 153 165 165 165 183 183 183 0 0 0 0 231 4 0 132 0 0 156 5 139 142 128 52 255 49 0 181 6 161 255 140 0 222 4 33 255 37 0 74 0 0 99 5 0 107 0 0 148 5 0 189 0 0 90 3 8 255 12 16 255 24 0 173 6 206 173 99 156 131 74 206 165 66 115 82 16 255 181 16 189 132 0 132 99 16 206 149 0 198 181 123 255 181 49 255 189 33 222 156 0 99 75 0 239 173 0 255 181 0 255 181 140 148 107 0 140 115 49 198 173 123 255 173 0 90 66 0 132 91 0 206 182 99 156 115 0 198 141 0 74 50 0 255 189 16 214 148 0 90 57 0 189 140 0 107 74 0 206 148 16 214 156 8 ];
-                mask:((ImageMask new)
-                            width:16;
-                            height:16;
-                            bits:(ByteArray 
-                                        fromPackedString:'@@@@@@@@A>@O<A?8G? _>A?8G? _>@?0A>@@@@@@@@@b');
-                            yourself);
-                yourself
-        ]
+LTY@@@@@@@@@LCH2L#HIS#D1M@@@@@@@@D4<OC0<BSL1LTH@@@@@@@AML0$IBP$IBP%B@@@@@@@@LCL3L0$3BT\1LP@@@@@@@D@>L3L3BT]GQ2<@@@@@@@@@
+K$03BP$IQ3<@@@@@@@@@@@A@LTIBLR<@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@a')
+            colorMapFromArray:#[226 226 226 176 176 176 155 155 155 169 169 169 152 152 152 164 164 164 149 149 149 192 192 192 240 240 240 255 255 255 202 202 202 201 201 201 151 151 151 162 162 162 148 148 148 158 158 158 173 173 173 154 154 154 167 167 167 150 150 150 160 160 160 180 180 180 156 156 156 170 170 170 153 153 153 165 165 165 183 183 183 0 0 0 0 231 4 0 132 0 0 156 5 139 142 128 52 255 49 0 181 6 161 255 140 0 222 4 33 255 37 0 74 0 0 99 5 0 107 0 0 148 5 0 189 0 0 90 3 8 255 12 16 255 24 0 173 6 206 173 99 156 131 74 206 165 66 115 82 16 255 181 16 189 132 0 132 99 16 206 149 0 198 181 123 255 181 49 255 189 33 222 156 0 99 75 0 239 173 0 255 181 0 255 181 140 148 107 0 140 115 49 198 173 123 255 173 0 90 66 0 132 91 0 206 182 99 156 115 0 198 141 0 74 50 0 255 189 16 214 148 0 90 57 0 189 140 0 107 74 0 206 148 16 214 156 8]
+            mask:((ImageMask width:16 height:16) bits:(ByteArray fromPackedString:'@@@@@@@@A>@O<A?8G? _>A?8G? _>@?0A>@@@@@@@@@b'); yourself); yourself]
 !
 
 imageFor_integers
@@ -1009,39 +989,27 @@
 !
 
 imageFor_sequenceableCollections
-    <resource: #image>
     "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 imageFor_sequenceableCollections inspect
      ImageEditor openOnClass:self andSelector:#imageFor_sequenceableCollections
-     Icon flushCachedIcons"
-    
-    ^ Icon 
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
         constantNamed:'InspectorView class imageFor_sequenceableCollections'
-        ifAbsentPut:[
-            (Depth8Image new)
-                width:16;
-                height:16;
-                photometric:(#palette);
-                bitsPerSample:(#[ 8 ]);
-                samplesPerPixel:(1);
-                bits:(ByteArray 
-                            fromPackedString:'
-@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@A@T5EQT4@@@@@@@@@@@@AOTUAPTEARS0@@@@@@@@AOTUAPTE@I
-BEIO@@@@@@@@T5APTEAPTUIRO0@@@@@@@EEPTEAPT $HO3D@@@@@@@AQTUERT%IRO3D1@@@@@@@@T5IRT%IRBP!!JO0@@@@@@@D=RT%H?LSEJR"<@@@@@@@@@
-S3D1LT(IBB<@@@@@@@@@@@AOO3D1O2<@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@a');
-                colorMapFromArray:#[ 226 226 226 176 176 176 155 155 155 169 169 169 152 152 152 164 164 164 149 149 149 192 192 192 240 240 240 255 255 255 202 202 202 201 201 201 151 151 151 162 162 162 148 148 148 158 158 158 173 173 173 154 154 154 167 167 167 150 150 150 160 160 160 180 180 180 156 156 156 170 170 170 153 153 153 165 165 165 183 183 183 0 0 0 227 231 0 132 132 0 151 156 0 142 131 128 255 252 49 175 181 0 255 234 140 218 222 0 251 255 33 74 74 0 94 99 0 107 107 0 143 148 0 189 189 0 87 90 0 251 255 8 247 255 16 167 173 0 206 99 132 156 74 99 206 66 107 115 16 49 255 16 90 189 0 57 132 16 49 206 0 57 198 123 140 255 49 123 255 33 99 222 0 66 99 0 24 239 0 66 255 0 74 255 140 214 148 0 41 140 49 74 198 123 148 255 0 82 90 0 24 132 0 41 206 99 123 156 0 41 198 0 57 74 0 24 255 16 82 214 0 66 90 0 33 189 0 49 107 0 33 206 16 74 214 8 66 218 112 214 255 0 255 208 32 144 199 21 133 186 85 211 ];
-                mask:((ImageMask new)
-                            width:16;
-                            height:16;
-                            bits:(ByteArray 
-                                        fromPackedString:'@@@@@@@@A>@O<A?8G? _>A?8G? _>@?0A>@@@@@@@@@b');
-                            yourself);
-                yourself
-        ]
+        ifAbsentPut:[(Depth4Image width:16 height:16) bits:(ByteArray fromPackedString:'
+L3L3L3L3L3L3L3L3L3L3L3L3L3L3L3L3L3L0Y7XCL3L3L2]UUYH3L3L2]UU\FRL3L3YUUU^Y(3L3M5UU''A*CL3L7]9&Y*HL3L3ZY&Y0[(3L3L)&Z"K-CL3L3
+JH"<ECL3L3L2*H)CL3L3L3L3L3L3L3L3L3L3L3L3L3L3L3L3L3Lb')
+            colorMapFromArray:#[198 123 148 240 240 240 218 112 214 226 226 226 156 74 99 255 0 255 186 85 211 208 32 144 115 16 49 199 21 133 140 49 74 90 0 33 255 255 255]
+            mask:((ImageMask width:16 height:16) bits:(ByteArray fromPackedString:'@@@@@@@@A>@O<A?8G? _>A?8G? _>@?0A>@@@@@@@@@b'); yourself); yourself]
 !
 
 imageFor_strings
@@ -1215,6 +1183,9 @@
                 ].
                 ^ self imageFor_strings
             ].
+            anObject isEmpty ifTrue:[
+                ^ self imageFor_collections_empty
+            ].    
             (anObject isDictionary) ifTrue:[
                 ^ self imageFor_dictionaries
             ].
@@ -1253,6 +1224,7 @@
     ^ self imageFor_others
 
     "Created: / 16-05-2012 / 17:58:20 / cg"
+    "Modified: / 17-03-2017 / 11:26:59 / cg"
 !
 
 iconForValueClass: aClass
@@ -3261,8 +3233,8 @@
     d := self derivedFields.
     (d isDictionary) ifTrue:[
         actionItems := d keys select:[:k | k first == $!!] as:OrderedCollection .
-        valueItems := d keys select:[:k | '-¤' includes:k first] as:OrderedCollection.
-        otherItems := d keys select:[:k | ('!!-¤' includes: k first) not] as:OrderedCollection.
+        valueItems := d keys select:[:k | '-¤' includes:k first] as:OrderedCollection.
+        otherItems := d keys select:[:k | ('!!-¤' includes: k first) not] as:OrderedCollection.
         ^ ((actionItems sort , valueItems sort) collect:[:k | (k copyTo:1),(k copyFrom:2) allItalic])
           ,
           otherItems sort
@@ -3889,7 +3861,7 @@
             ^ self valueForSpecialLine:lineEntry
         ].
     ].
-    (lineEntry startsWith:$¤) ifTrue:[
+    (lineEntry startsWith:$¤) ifTrue:[
         ^ self valueForSpecialLine:lineEntry
     ].
 
@@ -4287,7 +4259,7 @@
 !
 
 tryToSelectKeyNamed:aString
-    "called from the debugger to try to select the previousöy selected
+    "called from the debugger to try to select the previousöy selected
      field (by name)"
      
     |list idx aStringWithSpace|