Merge jv
authorMerge Script
Tue, 06 Oct 2015 06:43:18 +0200
branchjv
changeset 5459 b54f4b01de15
parent 5448 90da5b2509bf (current diff)
parent 5458 87612e57dff1 (diff)
child 5470 00d06a29e01c
Merge
TextCollector.st
--- a/ArrowButton.st	Mon Oct 05 06:39:43 2015 +0200
+++ b/ArrowButton.st	Tue Oct 06 06:43:18 2015 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1993 by Claus Gittinger
 	      All Rights Reserved
@@ -11,6 +13,8 @@
 "
 "{ Package: 'stx:libwidg' }"
 
+"{ NameSpace: Smalltalk }"
+
 Button subclass:#ArrowButton
 	instanceVariableNames:'arrowStyle direction'
 	classVariableNames:'DownArrowForm UpArrowForm LeftArrowForm RightArrowForm
@@ -511,7 +515,7 @@
     ^ self defaultMACArrowButtonFormForDirection:direction onDevice:aDevice
 
     "
-     self defaultUpArrowButtonForm
+     self defaultArrowButtonFormForStyle:#macosx direction:#up onDevice:Screen
     "
 
     "Modified: / 26.3.1999 / 15:19:11 / cg"
@@ -924,16 +928,6 @@
     DefaultArrowButtonPassiveLevel notNil ifTrue:[offLevel := DefaultArrowButtonPassiveLevel].
     offLevel ~~ level ifTrue:[self level:offLevel].
 
-"/    "
-"/     special treatment for motif arrows 
-"/     - they do not really fit into the general (bitmap) scheme ...
-"/    "
-"/    arrowStyle == #motif ifTrue:[
-"/        onLevel := 0.
-"/        offLevel := 0.
-"/        self level:0.
-"/    ]
-
     "Modified: 22.1.1997 / 11:57:00 / cg"
 !
 
@@ -1059,10 +1053,10 @@
 !ArrowButton class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ArrowButton.st,v 1.76 2014-03-19 10:04:37 stefan Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/ArrowButton.st,v 1.76 2014-03-19 10:04:37 stefan Exp $'
+    ^ '$Header$'
 ! !
 
--- a/Button.st	Mon Oct 05 06:39:43 2015 +0200
+++ b/Button.st	Tue Oct 06 06:43:18 2015 +0200
@@ -11,6 +11,8 @@
 "
 "{ Package: 'stx:libwidg' }"
 
+"{ NameSpace: Smalltalk }"
+
 Label subclass:#Button
 	instanceVariableNames:'activeLogo passiveLogo disabledLogo focusLogo onLevel offLevel
 		disabledFgColor disabledEtchedFgColor activeFgColor activeBgColor
@@ -1203,12 +1205,14 @@
     "set the level of the button when pressed (i.e. how deep)"
 
     onLevel ~~ aNumber ifTrue:[
-        onLevel := aNumber.
-        (controller notNil
-        and:[controller pressed]) ifTrue:[
-            self level:onLevel.
-            margin := onLevel abs max:offLevel abs.
-            self invalidate. 
+        (styleSheet at:'button.ignoreLevel' default:false) ifFalse:[
+            onLevel := aNumber.
+            (controller notNil
+            and:[controller pressed]) ifTrue:[
+                self level:onLevel.
+                margin := onLevel abs max:offLevel abs.
+                self invalidate. 
+            ]
         ]
     ].
 
@@ -1497,12 +1501,14 @@
     "set the level of the button when not pressed (i.e. how high)"
 
     offLevel ~~ aNumber ifTrue:[
-        offLevel := aNumber.
-        (controller notNil
-        and:[controller pressed not]) ifTrue:[
-            self level:offLevel.
-            margin := onLevel abs max:offLevel abs.
-            self invalidate.
+        (styleSheet at:'button.ignoreLevel' default:false) ifFalse:[
+            offLevel := aNumber.
+            (controller notNil
+            and:[controller pressed not]) ifTrue:[
+                self level:offLevel.
+                margin := onLevel abs max:offLevel abs.
+                self invalidate.
+            ]
         ]
     ]
 
@@ -1785,9 +1791,9 @@
 initStyle
     "setup viewStyle specifics"
 
-    <resource: #style (#name)>
-
-    |hasGreyscales nm graphicsDevice|
+    <resource: #style (#name #'button.style')>
+
+    |hasGreyscales nm graphicsDevice buttonStyle borderStyle|
 
     super initStyle.
     graphicsDevice := self graphicsDevice.
@@ -1911,6 +1917,13 @@
         ].
     ].
 
+    buttonStyle := styleSheet at:'button.style' default:nil.
+    ((self class == Button) and:[ buttonStyle == #MacOSX ]) ifTrue:[
+        borderStyle := styleSheet at:'button.borderStyle'.
+        self border:( (Smalltalk at:borderStyle asSymbol) color:Color black ).
+        self viewBackground:(View defaultViewBackgroundColor).
+    ].
+
 "/ unfinished...
 "/    nm = #winVista ifTrue:[
 "/        self border:(RoundButtonBorder width:2 color:Color grey).
@@ -2012,6 +2025,14 @@
 
 !Button methodsFor:'queries'!
 
+extraMarginForBorder
+    (self class == Button
+    and:[ (styleSheet at:'button.style' default:nil) == #'MacOSX' ]) ifTrue:[
+        ^ 4
+    ].    
+    ^ 0
+!
+
 is3D
     "return true, if the receiver is a 3D style view"
 
@@ -2121,16 +2142,19 @@
     "redraw myself with fg/bg. Use super to draw the label, add
      the return-arrow here."
 
-    |x y sColor lColor etchFg shownLogo isEnabled|
+    |x y sColor lColor etchFg shownLogo isEnabled isActive isEntered clearInside showBorder|
 
     shown ifFalse:[^ self].
 
     isEnabled := self enabled.
+    isActive := (controller active or:[controller pressed]).
+    isEntered := (controller entered or:[controller pressed]).
+    
     isEnabled ifFalse:[
         etchFg := disabledEtchedFgColor.
     ].
 
-    (controller active or:[controller pressed]) ifTrue:[
+    isActive ifTrue:[
         shownLogo := activeLogo ? enteredLogo ? passiveLogo ? logo. 
     ] ifFalse:[
         shownLogo := passiveLogo ? logo.
@@ -2146,8 +2170,77 @@
         logo := shownLogo.
     ].
 
-    self drawWith:fg and:bg clearInside:true etchedFg:etchFg.   "this draws the text/image"
-
+    clearInside := true.
+    showBorder := false.
+    
+    (self class == Button
+    and:[ ((styleSheet at:'button.style' default:nil) == #'MacOSX') ]) ifTrue:[
+        |c1 c2 c3 bc|
+        isActive ifTrue:[
+            c1 := (styleSheet colorAt:'button.activeBackgroundColor1' default:nil). 
+            c2 := (styleSheet colorAt:'button.activeBackgroundColor2' default:nil).
+            c3 := (styleSheet colorAt:'button.activeBackgroundColor3' default:nil).
+            bc := (styleSheet colorAt:'button.activeBorderColor' default:(Color grey:72)).
+        ] ifFalse:[
+            isEntered ifTrue:[
+                c1 := (styleSheet colorAt:'button.enteredBackgroundColor1' default:nil). 
+                c2 := (styleSheet colorAt:'button.enteredBackgroundColor2' default:nil).
+                c3 := (styleSheet colorAt:'button.enteredBackgroundColor3' default:nil).
+                bc := (styleSheet colorAt:'button.enteredBorderColor' default:(Color grey:72)).
+            ] ifFalse:[
+                c1 := (styleSheet colorAt:'button.passiveBackgroundColor1' default:nil). 
+                c2 := (styleSheet colorAt:'button.passiveBackgroundColor2' default:nil).
+                c3 := (styleSheet colorAt:'button.passiveBackgroundColor3' default:nil).
+                bc := (styleSheet colorAt:'button.passiveBorderColor' default:(Color grey:72)).
+            ].    
+        ].    
+        (border class == MacFlatButtonBorder) ifTrue:[ 
+            (c1 notNil and:[c2 notNil]) ifTrue:[
+                border backgroundColor1:c1.
+                border backgroundColor2:c2.
+                border color:bc.
+                (GradientBackground new
+                        direction:#northSouth;
+                         colors:{c1 . c2};
+                         usedLength:height)
+                    fillRectangleX:0 y:0 width:width height:height in:self.
+
+                clearInside := false.
+            ] ifFalse:[
+                c1 := c2 := bg. 
+                border backgroundColor1:c1.
+                border backgroundColor2:c2.
+                border color:bc.
+            ].
+            showBorder := true.
+        ].
+        (border class == MacButtonBorder) ifTrue:[ 
+            (c1 notNil and:[c2 notNil and:[c3 notNil]]) ifTrue:[
+                border backgroundColor1:c1.
+                border backgroundColor2:c2.
+                border color:bc.
+                (GradientBackground new
+                        direction:#northSouth;
+                        colors:{ c1 . c2 . c3};
+                        usedLength:height)
+                    fillRectangleX:0 y:0 width:width height:height in:self.
+
+                clearInside := false.
+            ] ifFalse:[
+                c1 := c2 := bg. 
+                border backgroundColor1:c1.
+                border backgroundColor2:c2.
+                border color:bc.
+            ].
+            showBorder := true.
+        ].
+    ].    
+    self drawWith:fg and:bg clearInside:clearInside etchedFg:etchFg.   "this draws the text/image"
+    
+    showBorder ifTrue:[
+        border displayOn:self forDisplayBox:(0@0 corner:width@height).
+    ].
+    
     (isReturnButton and:[shadowForm notNil]) ifTrue:[
         y := (height - shadowForm height) // 2.
         x := width - shadowForm width - (hSpace // 2).
@@ -2186,7 +2279,9 @@
         self paint:fg.
     ].
 
-    self hasFocus ifTrue:[ self drawFocusFrame ].
+    self hasFocus ifTrue:[ 
+        self drawFocusFrame 
+    ].
 
     "Modified: / 22-10-2010 / 15:55:03 / cg"
 !
@@ -2196,11 +2291,13 @@
      That's like redrawing a label, but uses different colors when pressed
      or entered."
 
-    |fg bg entered noFrame lvl isEnabled|
+    |fg bg entered hasFrame lvl isEnabled|
 
     shown ifFalse:[^ self].
     isEnabled := self enabled.
 
+    "/ Transcript showCR:border.
+    
 "/    disabledLogo notNil ifTrue:[
 "/        isEnabled ifFalse:[
 "/            logo := disabledLogo.
@@ -2213,7 +2310,7 @@
 "/        ].
 "/    ].
 
-    noFrame := true.
+    hasFrame := false.
     fg := fgColor.
     bg := bgColor.
     isEnabled ifFalse:[
@@ -2236,7 +2333,7 @@
             ]
         ].
         (controller pressed and:[entered or:[controller isTriggerOnDown]]) ifTrue:[
-            noFrame := self is3D "false".
+            hasFrame := self is3D not.
             activeFgColor isNil ifTrue:[
                 onLevel == offLevel ifTrue:[
                     fg := bgColor
@@ -2253,13 +2350,13 @@
             ].
 
             self is3D ifFalse:[
-                noFrame := (fgColor = fg) and:[bgColor = bg].
+                hasFrame := ((fgColor = fg) and:[bgColor = bg]) not.
             ].
         ].
     ].
 
     self drawWith:fg and:bg.
-    noFrame ifFalse:[
+    hasFrame ifTrue:[
         "
          draw a rectangle around (2D styles only)
         "
@@ -2320,10 +2417,10 @@
 !Button class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Button.st,v 1.161 2014-12-02 18:35:49 cg Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/Button.st,v 1.161 2014-12-02 18:35:49 cg Exp $'
+    ^ '$Header$'
 ! !
 
--- a/MacOSX2ToolbarIconLibrary.st	Mon Oct 05 06:39:43 2015 +0200
+++ b/MacOSX2ToolbarIconLibrary.st	Tue Oct 06 06:43:18 2015 +0200
@@ -261,6 +261,362 @@
 @@@@@@@@@@@@@@@@@@@@@@@@@@@GE@HOC0HTA0@@@@@@@@@NE0LED!!HE@1\N@@@@@@@ND@TUEQTUEQTED@8@@@@GE0TUEQTUEQTUEPTWA0@@E@LUEQTFA@PF
 EQTU@1P@@@HEEQTFC@,MC@XUEPTB@@@OD!!TUAADSD1DDEQTRC0@@C1HUEPPVD1LVAATUD <@@@HEEQTF@P$I@PXUEPTB@@@T@1TUEP JB  UEQTCE@@@A1\E
 EQTUEQTUEQTEE0\@@@@ND@TUEQTUEQTED@8@@@@@@@8W@0TRD TCE08@@@@@@@@@A1PBC0<BE@\@@@@@@@@@@@@@@@@@@@@@@@@@@@@a') colorMapFromArray:#[223 222 223 85 149 218 93 160 240 61 147 248 65 149 244 65 151 248 67 151 246 187 203 228 58 141 236 219 232 245 38 115 212 222 236 250 109 173 243 225 238 251 151 185 232 66 147 246 64 148 245 226 238 250 67 152 248 255 255 255 133 178 234 68 153 248 220 233 246 82 154 243] mask:((ImageMask width:16 height:16) bits:(ByteArray fromPackedString:'@@@O<A?8O?1??''?>_?9??''?>_?9??''?>O?0_>@?0@@@b'); yourself); yourself]
+!
+
+scrollDownDisabledIcon
+    "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 scrollDownDisabledIcon inspect
+     ImageEditor openOnClass:self andSelector:#scrollDownDisabledIcon
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'MacOSX2ToolbarIconLibrary scrollDownDisabledIcon'
+        ifAbsentPut:[(Depth4Image width:16 height:16) bits:(ByteArray fromPackedString:'
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@CL2DQ@@@@@@P3LQP@@@@@@DL1P@@@@@@@ACP@@@@@@@@@@@@@@@@@
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@b') colorMapFromArray:#[0 0 0 192 192 190 176 174 170 156 158 160 244 246 250] mask:((ImageMask width:16 height:16) bits:(ByteArray fromPackedString:'@@@@@@@@@@@@@@@@A?@G<@O @\@@@@@@@@@@@@@@@@@b'); yourself); yourself]
+!
+
+scrollDownEnteredIcon
+    "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 scrollDownEnteredIcon inspect
+     ImageEditor openOnClass:self andSelector:#scrollDownEnteredIcon
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'MacOSX2ToolbarIconLibrary scrollDownEnteredIcon'
+        ifAbsentPut:[(Depth4Image width:16 height:16) bits:(ByteArray fromPackedString:'
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@FFYL3@@@@@@P!!FSP@@@@@@DVHP@@@@@@@AGP@@@@@@@@@P@@@@@@@
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@b') colorMapFromArray:#[0 0 0 72 74 70 32 34 30 136 134 130 244 246 250 32 30 30 84 86 90 44 46 50 52 54 50 120 120 120] mask:((ImageMask width:16 height:16) bits:(ByteArray fromPackedString:'@@@@@@@@@@@@@@@@A?@G<@O @\@@ @@@@@@@@@@@@@@b'); yourself); yourself]
+!
+
+scrollDownIcon
+    "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 scrollDownIcon inspect
+     ImageEditor openOnClass:self andSelector:#scrollDownIcon
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'MacOSX2ToolbarIconLibrary scrollDownIcon'
+        ifAbsentPut:[(Depth8Image width:16 height:16) bits:(ByteArray fromPackedString:'
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
+@@@@@@@@@@@@@@@FB@0MC1@N@@@@@@@@@@@@D HEBP,JD @@@@@@@@@@@@@R@PPGD @@@@@@@@@@@@@@@AHCD @@@@@@@@@@@@@@@@@@D @@@@@@@@@@@@@@
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@a') colorMapFromArray:#[0 0 0 32 30 30 32 34 30 44 46 50 52 54 50 72 74 70 84 86 90 92 92 90 120 120 120 120 122 120 136 134 130 140 140 140 156 158 160 176 174 170 184 182 180 184 184 180 192 192 190 228 228 230 244 246 250] mask:((ImageMask width:16 height:16) bits:(ByteArray fromPackedString:'@@@@@@@@@@@@@@@@A?@G<@O @\@@ @@@@@@@@@@@@@@b'); yourself); yourself]
+!
+
+scrollLeftDisabledIcon
+    "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 scrollLeftDisabledIcon inspect
+     ImageEditor openOnClass:self andSelector:#scrollLeftDisabledIcon
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'MacOSX2ToolbarIconLibrary scrollLeftDisabledIcon'
+        ifAbsentPut:[(Depth4Image width:16 height:16) bits:(ByteArray fromPackedString:'
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@P0@@@@@@@@P3@@@@@@@@P3L@@@@@@@P3L @@@@@@@DDQ@@@@@@@@AAD@@@@@@@
+@@PP@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@b') colorMapFromArray:#[0 0 0 192 192 190 176 174 170 120 120 120 244 246 250] mask:((ImageMask width:16 height:16) bits:(ByteArray fromPackedString:'@@@@@@@@@@@@@@F@@8@G @>@A8@C @F@@@@@@@@@@@@b'); yourself); yourself]
+!
+
+scrollLeftEnteredIcon
+    "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 scrollLeftEnteredIcon inspect
+     ImageEditor openOnClass:self andSelector:#scrollLeftEnteredIcon
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'MacOSX2ToolbarIconLibrary scrollLeftEnteredIcon'
+        ifAbsentPut:[(Depth4Image width:16 height:16) bits:(ByteArray fromPackedString:'
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@L @@@@@@@@L!!@@@@@@@@MA\@@@@@@@MVE0@@@@@@@CY7@@@@@@@@@7\@@@@@@@
+@@M0@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@b') colorMapFromArray:#[0 0 0 72 74 70 32 34 30 244 246 250 32 30 30 44 46 50 52 54 50 120 120 120] mask:((ImageMask width:16 height:16) bits:(ByteArray fromPackedString:'@@@@@@@@@@@@@@F@@8@G @>@A8@C @F@@@@@@@@@@@@b'); yourself); yourself]
+!
+
+scrollLeftIcon
+    "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 scrollLeftIcon inspect
+     ImageEditor openOnClass:self andSelector:#scrollLeftIcon
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'MacOSX2ToolbarIconLibrary scrollLeftIcon'
+        ifAbsentPut:[(Depth8Image width:16 height:16) bits:(ByteArray fromPackedString:'
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@D X@
+@@@@@@@@@@@@@@@@D HH@@@@@@@@@@@@@@@@D DEC@@@@@@@@@@@@@@@D LDBP4@@@@@@@@@@@@@@@@RA0,O@@@@@@@@@@@@@@@@@AHJD@@@@@@@@@@@@@@@
+@@@@D 8@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@a') colorMapFromArray:#[0 0 0 32 30 30 32 34 30 44 46 50 52 54 50 72 74 70 84 86 90 92 92 90 120 120 120 120 122 120 136 134 130 140 140 140 156 158 160 176 174 170 184 182 180 184 184 180 192 192 190 228 228 230 244 246 250] mask:((ImageMask width:16 height:16) bits:(ByteArray fromPackedString:'@@@@@@@@@@@@@@F@@8@G @>@A8@C @F@@@@@@@@@@@@b'); yourself); yourself]
+!
+
+scrollRightActiveIcon
+    "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 scrollRightActiveIcon inspect
+     ImageEditor openOnClass:self andSelector:#scrollRightActiveIcon
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'MacOSX2ToolbarIconLibrary scrollRightActiveIcon'
+        ifAbsentPut:[(Depth4Image width:16 height:16) bits:(ByteArray fromPackedString:'
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@GT@@@@@@@@@\%@@@@@@@@B!!YP@@@@@@@JFXT@@@@@@@(9T@@@@@@@B$T@@@@@@@
+@JT@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@b') colorMapFromArray:#[0 0 0 72 74 70 32 34 30 140 140 140 136 134 130 244 246 250 32 30 30 84 86 90 44 46 50 52 54 50 120 120 120] mask:((ImageMask width:16 height:16) bits:(ByteArray fromPackedString:'@@@@@@@@@@@@@@L@@8@C0@O @<@C @L@@@@@@@@@@@@b'); yourself); yourself]
+!
+
+scrollRightDisabledIcon
+    "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 scrollRightDisabledIcon inspect
+     ImageEditor openOnClass:self andSelector:#scrollRightDisabledIcon
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'MacOSX2ToolbarIconLibrary scrollRightDisabledIcon'
+        ifAbsentPut:[(Depth4Image width:16 height:16) bits:(ByteArray fromPackedString:'
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@BP@@@@@@@@@H$@@@@@@@@@"I@@@@@@@@CH"P@@@@@@@DQP@@@@@@@@QP@@@@@@@
+@AP@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@b') colorMapFromArray:#[0 0 0 192 192 190 120 120 120 156 158 160 244 246 250] mask:((ImageMask width:16 height:16) bits:(ByteArray fromPackedString:'@@@@@@@@@@@@@@L@@8@C0@O @<@C @L@@@@@@@@@@@@b'); yourself); yourself]
+!
+
+scrollRightEnteredIcon
+    "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 scrollRightEnteredIcon inspect
+     ImageEditor openOnClass:self andSelector:#scrollRightEnteredIcon
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'MacOSX2ToolbarIconLibrary scrollRightEnteredIcon'
+        ifAbsentPut:[(Depth4Image width:16 height:16) bits:(ByteArray fromPackedString:'
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@GT@@@@@@@@@\%@@@@@@@@B!!YP@@@@@@@JFXT@@@@@@@(9T@@@@@@@B$T@@@@@@@
+@JT@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@b') colorMapFromArray:#[0 0 0 72 74 70 32 34 30 140 140 140 136 134 130 244 246 250 32 30 30 84 86 90 44 46 50 52 54 50 120 120 120] mask:((ImageMask width:16 height:16) bits:(ByteArray fromPackedString:'@@@@@@@@@@@@@@L@@8@C0@O @<@C @L@@@@@@@@@@@@b'); yourself); yourself]
+!
+
+scrollRightIcon
+    "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 scrollRightIcon inspect
+     ImageEditor openOnClass:self andSelector:#scrollRightIcon
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'MacOSX2ToolbarIconLibrary scrollRightIcon'
+        ifAbsentPut:[(Depth4Image width:16 height:16) bits:(ByteArray fromPackedString:'
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@IH@@@@@@@@@)R@@@@@@@@A>P @@@@@@@A<=H@@@@@@@"+H@@@@@@@CJH@@@@@@@
+@FH@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@b') colorMapFromArray:#[0 0 0 176 174 170 244 246 250 52 54 50 32 30 30 32 34 30 184 182 180 156 158 160 184 184 180 84 86 90 140 140 140 92 92 90 192 192 190 44 46 50 72 74 70 120 122 120] mask:((ImageMask width:16 height:16) bits:(ByteArray fromPackedString:'@@@@@@@@@@@@@@L@@8@C0@O @<@C @L@@@@@@@@@@@@b'); yourself); yourself]
+!
+
+scrollUpActiveIcon
+    "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 scrollUpActiveIcon inspect
+     ImageEditor openOnClass:self andSelector:#scrollUpActiveIcon
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'MacOSX2ToolbarIconLibrary scrollUpActiveIcon'
+        ifAbsentPut:[(Depth4Image width:16 height:16) bits:(ByteArray fromPackedString:'
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@0@@@@@@@@@6L@@@@@@@@4]3@@@@@@@2HX 0@@@@@EVH"H@@@@@@@@@@@@@@@@
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@b') colorMapFromArray:#[0 0 0 72 74 70 32 34 30 244 246 250 32 30 30 84 86 90 44 46 50 52 54 50 120 120 120] mask:((ImageMask width:16 height:16) bits:(ByteArray fromPackedString:'@@@@@@@@@@@@@@B@@\@C8@_0A?@@@@@@@@@@@@@@@@@b'); yourself); yourself]
+!
+
+scrollUpDisabledIcon
+    "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 scrollUpDisabledIcon inspect
+     ImageEditor openOnClass:self andSelector:#scrollUpDisabledIcon
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'MacOSX2ToolbarIconLibrary scrollUpDisabledIcon'
+        ifAbsentPut:[(Depth4Image width:16 height:16) bits:(ByteArray fromPackedString:'
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@A@@@@@@@@@ACP@@@@@@@ACLT@@@@@@ACL1E@@@@@@CL2DQ@@@@@@@@@@@@@@@@
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@b') colorMapFromArray:#[0 0 0 192 192 190 176 174 170 156 158 160 244 246 250] mask:((ImageMask width:16 height:16) bits:(ByteArray fromPackedString:'@@@@@@@@@@@@@@B@@\@C8@_0A?@@@@@@@@@@@@@@@@@b'); yourself); yourself]
+!
+
+scrollUpEnteredIcon
+    "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 scrollUpEnteredIcon inspect
+     ImageEditor openOnClass:self andSelector:#scrollUpEnteredIcon
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'MacOSX2ToolbarIconLibrary scrollUpEnteredIcon'
+        ifAbsentPut:[(Depth4Image width:16 height:16) bits:(ByteArray fromPackedString:'
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@0@@@@@@@@@6L@@@@@@@@4]3@@@@@@@2HX 0@@@@@EVH"H@@@@@@@@@@@@@@@@
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@b') colorMapFromArray:#[0 0 0 72 74 70 32 34 30 244 246 250 32 30 30 84 86 90 44 46 50 52 54 50 120 120 120] mask:((ImageMask width:16 height:16) bits:(ByteArray fromPackedString:'@@@@@@@@@@@@@@B@@\@C8@_0A?@@@@@@@@@@@@@@@@@b'); yourself); yourself]
+!
+
+scrollUpIcon
+    "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 scrollUpIcon inspect
+     ImageEditor openOnClass:self andSelector:#scrollUpIcon
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'MacOSX2ToolbarIconLibrary scrollUpIcon'
+        ifAbsentPut:[(Depth4Image width:16 height:16) bits:(ByteArray fromPackedString:'
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@P@@@@@@@@@]D@@@@@@@@SJ!!@@@@@@@T;9$P@@@@@H1''^5@@@@@@@@@@@@@@@@
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@b') colorMapFromArray:#[0 0 0 244 246 250 52 54 50 32 30 30 32 34 30 184 182 180 156 158 160 184 184 180 84 86 90 140 140 140 92 92 90 192 192 190 120 120 120 44 46 50 72 74 70 120 122 120] mask:((ImageMask width:16 height:16) bits:(ByteArray fromPackedString:'@@@@@@@@@@@@@@B@@\@C8@_0A?@@@@@@@@@@@@@@@@@b'); yourself); yourself]
+! !
+
+!MacOSX2ToolbarIconLibrary class methodsFor:'image specs - widgets'!
+
+scrollDownActiveIcon
+    "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 scrollDownActiveIcon inspect
+     ImageEditor openOnClass:self andSelector:#scrollDownActiveIcon
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'MacOSX2ToolbarIconLibrary scrollDownActiveIcon'
+        ifAbsentPut:[(Depth4Image width:16 height:16) bits:(ByteArray fromPackedString:'
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@FFYL3@@@@@@P!!FSP@@@@@@DVHP@@@@@@@AGP@@@@@@@@@P@@@@@@@
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@b') colorMapFromArray:#[0 0 0 72 74 70 32 34 30 136 134 130 244 246 250 32 30 30 84 86 90 44 46 50 52 54 50 120 120 120] mask:((ImageMask width:16 height:16) bits:(ByteArray fromPackedString:'@@@@@@@@@@@@@@@@A?@G<@O @\@@ @@@@@@@@@@@@@@b'); yourself); yourself]
+!
+
+scrollLeftActiveIcon
+    "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 scrollLeftActiveIcon inspect
+     ImageEditor openOnClass:self andSelector:#scrollLeftActiveIcon
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'MacOSX2ToolbarIconLibrary scrollLeftActiveIcon'
+        ifAbsentPut:[(Depth4Image width:16 height:16) bits:(ByteArray fromPackedString:'
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@P0@@@@@@@@P2@@@@@@@@QR @@@@@@@Q''J@@@@@@@@D^H@@@@@@@@AH @@@@@@@
+@@R@@@@@@@@@@A@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@b') colorMapFromArray:#[0 0 0 244 244 240 72 74 70 32 34 30 244 246 250 32 30 30 44 46 50 52 54 50 120 120 120] mask:((ImageMask width:16 height:16) bits:(ByteArray fromPackedString:'@@@@@@@@@@@@@@F@@8@G @>@A8@C @F@@H@@@@@@@@@b'); yourself); yourself]
 ! !
 
 !MacOSX2ToolbarIconLibrary class methodsFor:'documentation'!
--- a/MacOSXToolbarIconLibrary.st	Mon Oct 05 06:39:43 2015 +0200
+++ b/MacOSXToolbarIconLibrary.st	Tue Oct 06 06:43:18 2015 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 2014 by eXept Software AG
               All Rights Reserved
@@ -56,6 +54,104 @@
 "
 ! !
 
+!MacOSXToolbarIconLibrary class methodsFor:'image specs'!
+
+comboViewActiveIcon
+    "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 comboViewActiveIcon inspect
+     ImageEditor openOnClass:self andSelector:#comboViewActiveIcon
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'MacOSXToolbarIconLibrary comboViewActiveIcon'
+        ifAbsentPut:[(Depth8Image width:16 height:18) bits:(ByteArray fromPackedString:'
+ITI^W%9BD4IBITIBLQU@@DXIQ$Y!!BTYFQ$Y!!XRQ(TSX$I@PDIDEAPTERIBQAAFUOO%AP@@@>HREP@C9PTEA(X#-)G#,^N19)G%(;G!!9)G"49U&Q$NVQVNUYV
+NS%VYC$JJB!!TUB (UEP(UB!!TJEP(A5=_EAP4L =_W3AJDE=_E@ILZ$1*M2)MCB1MJ!!YLSD0<Y&Y&F6Y]I1D5A%4[F6X[GUTXJQ!!UFD$ WD$XUQ!!UUVL&I TE
+I"XEI"XEI TEQBXWH#<A@S<AO3<?H D?@PD"XE-+G6-+G6-[V1=+V1=+V0M''Y6]''L6]KY6]''R6\\L5 :RE]HRD!!HCT MCU\.U5\HF!!$YFQ$YFQ$YFQ$YNB-E
+S$]YC%%YK2=YVU%YK09SP2L@') colorMapFromArray:#[101 172 248 53 140 250 61 135 247 46 108 250 105 175 248 57 144 249 207 230 254 64 139 247 43 118 250 109 178 248 67 143 247 233 232 233 89 165 249 43 131 251 43 93 250 93 168 249 146 198 251 225 240 254 255 255 255 80 159 246 78 159 248 141 189 240 82 161 249 49 116 249 62 149 249 42 128 251 117 150 239 67 152 248 45 133 250 55 125 248 95 170 248 49 136 250 198 225 253 101 172 247 52 140 250 181 192 232 105 175 247 81 160 247 57 143 249 207 230 253 84 163 248 61 147 248 212 232 253 42 124 251 88 165 249 70 147 246 43 130 251 42 93 250 92 168 249 99 167 243 221 237 253 46 134 251 146 197 251 225 239 254 193 212 235 81 161 249 42 127 251 90 167 248 65 117 245 95 169 248 57 130 247 186 186 186 100 172 247 52 140 249 194 213 236 104 175 247 81 160 246 111 141 235 56 143 249 42 116 251 109 177 247 185 197 236 43 130 250 68 152 249 220 237 253 46 134 250 72 156 248 224 239 254 77 118 242 137 184 240 101 173 248 108 171 243 105 176 248 61 107 244 85 163 249 62 147 249 90 166 248 44 131 251 46 130 250 43 94 250 95 169 247 48 136 249 197 224 253 74 157 248 80 160 246 78 160 248 48 111 249 108 177 247 91 159 243 52 121 249 91 167 249 93 167 247 67 152 249 46 133 250 97 170 247 96 170 248 72 155 248 49 137 250] mask:((Depth1Image width:16 height:18) bits:(ByteArray fromPackedString:'??;????????????????????????????????????????????>'); yourself); yourself]
+!
+
+comboViewDisabledIcon
+    "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 comboViewDisabledIcon inspect
+     ImageEditor openOnClass:self andSelector:#comboViewDisabledIcon
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'MacOSXToolbarIconLibrary comboViewDisabledIcon'
+        ifAbsentPut:[(Depth8Image width:16 height:18) bits:(ByteArray fromPackedString:'
+@@DA@PDA@PDA@@DA@ LDAPXGA XFA0XFA XFA  IB ,HB@ HB@0LC@0HB@ LB@4NC0TEAPTOAPTEAP<EAPTID@HIBPHI@ $IBPHBBP$IBQDMD 4MCP4RCQHR
+CP4RCP4SDA@TEA@PEAPPEA@TDAPPEPDAE!!XWFA$A@Q$XE0DAE!!([GA,\@A4^G1<^GR@[F1,!!H"H"H"H#IA8^IBL"H"H"IRX''I"\&I2H(JRH''I"\&I"(UER,+
+EQT+EQT+ER,+EQT,F!!(ZF!!(ZF!!(ZF!!(ZF!!(ZKR8/K2</K2<.K"</K"</K#@1LSD1HSD!!LSD1HSD1HRT2L2T3L3L3ISL%IRT%IRT4MSH2L#H2L#H2L#H2J#X7
+LS 9N#$9N#(9NS$9N#(;H30E') colorMapFromArray:#[157 157 157 157 157 157 162 162 162 217 217 217 232 232 232 164 164 164 166 166 166 167 167 167 165 165 165 162 162 162 164 164 164 231 231 231 165 165 165 161 161 161 215 215 215 163 163 163 158 158 158 151 151 151 160 160 160 150 150 150 159 159 159 148 148 148 156 156 156 221 221 221 244 244 244 161 161 161 147 147 147 155 155 155 154 154 154 241 241 241 245 245 245 160 160 160 158 158 158 144 144 144 153 153 153 155 155 155 240 240 240 143 143 143 150 150 150 151 151 151 237 237 237 236 236 236 141 141 141 149 149 149 139 139 139 137 137 137 145 145 145 145 145 145 136 136 136 144 144 144 142 142 142 142 142 142 139 139 139 159 159 159 141 141 141 138 138 138 226 226 226 132 132 132 131 131 131 138 138 138 223 223 223] mask:((Depth1Image width:16 height:18) bits:(ByteArray fromPackedString:'??;????????????????????????????????????????????>'); yourself); yourself]
+!
+
+comboViewEnteredIcon
+    "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 comboViewEnteredIcon inspect
+     ImageEditor openOnClass:self andSelector:#comboViewEnteredIcon
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'MacOSXToolbarIconLibrary comboViewEnteredIcon'
+        ifAbsentPut:[(Depth8Image width:16 height:18) bits:(ByteArray fromPackedString:'
+ITI^W%9BD4IBITIBLQU@@DXIQ$Y!!BTYFQ$Y!!XRQ(TSX$I@PDIDEAPTERIBQAAFUOO%AP@@@>HREP@C9PTEA(X#-)G#,^N19)G%(;G!!9)G"49U&Q$NVQVNUYV
+NS%VYC$JJB!!TUB (UEP(UB!!TJEP(A5=_EAP4L =_W3AJDE=_E@ILZ$1*M2)MCB1MJ!!YLSD0<Y&Y&F6Y]I1D5A%4[F6X[GUTXJQ!!UFD$ WD$XUQ!!UUVL&I TE
+I"XEI"XEI TEQBXWH#<A@S<AO3<?H D?@PD"XE-+G6-+G6-[V1=+V1=+V0M''Y6]''L6]KY6]''R6\\L5 :RE]HRD!!HCT MCU\.U5\HF!!$YFQ$YFQ$YFQ$YNB-E
+S$]YC%%YK2=YVU%YK09SP2L@') colorMapFromArray:#[101 172 248 53 140 250 61 135 247 46 108 250 105 175 248 57 144 249 207 230 254 64 139 247 43 118 250 109 178 248 67 143 247 233 232 233 89 165 249 43 131 251 43 93 250 93 168 249 146 198 251 225 240 254 255 255 255 80 159 246 78 159 248 141 189 240 82 161 249 49 116 249 62 149 249 42 128 251 117 150 239 67 152 248 45 133 250 55 125 248 95 170 248 49 136 250 198 225 253 101 172 247 52 140 250 181 192 232 105 175 247 81 160 247 57 143 249 207 230 253 84 163 248 61 147 248 212 232 253 42 124 251 88 165 249 70 147 246 43 130 251 42 93 250 92 168 249 99 167 243 221 237 253 46 134 251 146 197 251 225 239 254 193 212 235 81 161 249 42 127 251 90 167 248 65 117 245 95 169 248 57 130 247 186 186 186 100 172 247 52 140 249 194 213 236 104 175 247 81 160 246 111 141 235 56 143 249 42 116 251 109 177 247 185 197 236 43 130 250 68 152 249 220 237 253 46 134 250 72 156 248 224 239 254 77 118 242 137 184 240 101 173 248 108 171 243 105 176 248 61 107 244 85 163 249 62 147 249 90 166 248 44 131 251 46 130 250 43 94 250 95 169 247 48 136 249 197 224 253 74 157 248 80 160 246 78 160 248 48 111 249 108 177 247 91 159 243 52 121 249 91 167 249 93 167 247 67 152 249 46 133 250 97 170 247 96 170 248 72 155 248 49 137 250] mask:((Depth1Image width:16 height:18) bits:(ByteArray fromPackedString:'??;????????????????????????????????????????????>'); yourself); yourself]
+!
+
+comboViewIcon
+    "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 comboViewIcon inspect
+     ImageEditor openOnClass:self andSelector:#comboViewIcon
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'MacOSXToolbarIconLibrary comboViewIcon'
+        ifAbsentPut:[(Depth8Image width:16 height:18) bits:(ByteArray fromPackedString:'
+ITI^W%9BD4IBITIBLQU@@DXIQ$Y!!BTYFQ$Y!!XRQ(TSX$I@PDIDEAPTERIBQAAFUOO%AP@@@>HREP@C9PTEA(X#-)G#,^N19)G%(;G!!9)G"49U&Q$NVQVNUYV
+NS%VYC$JJB!!TUB (UEP(UB!!TJEP(A5=_EAP4L =_W3AJDE=_E@ILZ$1*M2)MCB1MJ!!YLSD0<Y&Y&F6Y]I1D5A%4[F6X[GUTXJQ!!UFD$ WD$XUQ!!UUVL&I TE
+I"XEI"XEI TEQBXWH#<A@S<AO3<?H D?@PD"XE-+G6-+G6-[V1=+V1=+V0M''Y6]''L6]KY6]''R6\\L5 :RE]HRD!!HCT MCU\.U5\HF!!$YFQ$YFQ$YFQ$YNB-E
+S$]YC%%YK2=YVU%YK09SP2L@') colorMapFromArray:#[101 172 248 53 140 250 61 135 247 46 108 250 105 175 248 57 144 249 207 230 254 64 139 247 43 118 250 109 178 248 67 143 247 233 232 233 89 165 249 43 131 251 43 93 250 93 168 249 146 198 251 225 240 254 255 255 255 80 159 246 78 159 248 141 189 240 82 161 249 49 116 249 62 149 249 42 128 251 117 150 239 67 152 248 45 133 250 55 125 248 95 170 248 49 136 250 198 225 253 101 172 247 52 140 250 181 192 232 105 175 247 81 160 247 57 143 249 207 230 253 84 163 248 61 147 248 212 232 253 42 124 251 88 165 249 70 147 246 43 130 251 42 93 250 92 168 249 99 167 243 221 237 253 46 134 251 146 197 251 225 239 254 193 212 235 81 161 249 42 127 251 90 167 248 65 117 245 95 169 248 57 130 247 186 186 186 100 172 247 52 140 249 194 213 236 104 175 247 81 160 246 111 141 235 56 143 249 42 116 251 109 177 247 185 197 236 43 130 250 68 152 249 220 237 253 46 134 250 72 156 248 224 239 254 77 118 242 137 184 240 101 173 248 108 171 243 105 176 248 61 107 244 85 163 249 62 147 249 90 166 248 44 131 251 46 130 250 43 94 250 95 169 247 48 136 249 197 224 253 74 157 248 80 160 246 78 160 248 48 111 249 108 177 247 91 159 243 52 121 249 91 167 249 93 167 247 67 152 249 46 133 250 97 170 247 96 170 248 72 155 248 49 137 250] mask:((Depth1Image width:16 height:18) bits:(ByteArray fromPackedString:'??;????????????????????????????????????????????>'); yourself); yourself]
+! !
+
 !MacOSXToolbarIconLibrary class methodsFor:'image specs - widgets'!
 
 checkToggleOffDisabledIcon
--- a/TextCollector.st	Mon Oct 05 06:39:43 2015 +0200
+++ b/TextCollector.st	Tue Oct 06 06:43:18 2015 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -21,7 +19,7 @@
 		timeDelay access currentEmphasis alwaysAppendAtEnd collectSize
 		autoRaise'
 	classVariableNames:'TranscriptQuerySignal DebugSendersOfMessagePattern
-		TraceSendersOfMessagePattern TimestampMessage DefaultLineLimit
+		TraceSendersOfMessagePattern TimestampMessages DefaultLineLimit
 		DefaultTimeDelay DefaultCollectSize'
 	poolDictionaries:''
 	category:'Views-Text'
@@ -932,7 +930,9 @@
         DebugSendersOfMessagePattern notNil ifTrue:[
             (DebugSendersOfMessagePattern match:printString string) ifTrue:[
                 "/ to disable this right from inside the debugger, evaluate:
-                "/     DebugSendersOfMessagePattern := nil
+                "
+                 DebugSendersOfMessagePattern := nil
+                "
                 self halt:('Transcript: text matches: "', printString, '"').
             ].
         ].