class: ColorValue
authorClaus Gittinger <cg@exept.de>
Tue, 24 Mar 2015 16:15:07 +0100
changeset 3453 5591424bb4d2
parent 3452 8ae6c04fa1b4
child 3454 4938f4baa0ef
class: ColorValue added: #literalExample changed: #fromLiteralArrayEncoding:
ColorValue.st
--- a/ColorValue.st	Tue Mar 24 16:14:33 2015 +0100
+++ b/ColorValue.st	Tue Mar 24 16:15:07 2015 +0100
@@ -183,16 +183,16 @@
         green := clr scaledGreen.
         blue := clr scaledBlue.
     ] ifFalse:[
-        (encoding at:2) isSymbol ifTrue:[
-            clr := ColorValue perform:(encoding at:2) withArguments:(encoding at:3).
-            red := clr scaledRed.
-            green := clr scaledGreen.
-            blue := clr scaledBlue.
-        ] ifFalse:[
+"/        (encoding at:2) isSymbol ifTrue:[
+"/            clr := ColorValue perform:(encoding at:2) withArguments:(encoding at:3).
+"/            red := clr scaledRed.
+"/            green := clr scaledGreen.
+"/            blue := clr scaledBlue.
+"/        ] ifFalse:[
             red := (encoding at:2).
             green := (encoding at:3).
             blue := (encoding at:4).
-        ]
+"/        ]
     ]
 
     "
@@ -229,6 +229,10 @@
 !ColorValue class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ColorValue.st,v 1.18 2015-03-24 15:14:33 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ColorValue.st,v 1.19 2015-03-24 15:15:07 cg Exp $'
+!
+
+version_CVS
+    ^ '$Header: /cvs/stx/stx/libview2/ColorValue.st,v 1.19 2015-03-24 15:15:07 cg Exp $'
 ! !