--- a/ColorValue.st	Thu Mar 06 15:16:03 1997 +0100
+++ b/ColorValue.st	Thu Mar 06 15:45:30 1997 +0100
@@ -174,9 +174,9 @@
 
     encoding size == 2 ifTrue:[
         clr := ColorValue name:(encoding at:2).
-        red := clr red.
-        green := clr green.
-        blue := clr blue.
+        red := clr scaledRed.
+        green := clr scaledGreen.
+        blue := clr scaledBlue.
     ] ifFalse:[
         red := (encoding at:2).
         green := (encoding at:3).
@@ -188,6 +188,7 @@
     "
 
     "Created: 22.1.1997 / 04:18:50 / cg"
+    "Modified: 6.3.1997 / 15:45:01 / cg"
 !
 
 literalArrayEncoding
@@ -214,5 +215,5 @@
 !ColorValue class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ColorValue.st,v 1.15 1997-03-05 12:24:26 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ColorValue.st,v 1.16 1997-03-06 14:45:30 cg Exp $'
 ! !