--- a/Color.st Fri Oct 15 19:10:08 2004 +0200
+++ b/Color.st Sat Oct 16 14:30:10 2004 +0200
@@ -3792,6 +3792,7 @@
"return the blue component in percent [0..100]"
(blue isNil and:[colorId notNil]) ifTrue:[
+ device isNil ifTrue:[^ 0].
device getRGBFrom:colorId into:[:r :g :b | ^ b].
].
^ blue * 100.0 / MaxValue
@@ -3895,6 +3896,7 @@
"return the green component in percent [0..100]"
(green isNil and:[colorId notNil]) ifTrue:[
+ device isNil ifTrue:[^ 0].
device getRGBFrom:colorId into:[:r :g :b | ^ g].
].
^ green * 100.0 / MaxValue
@@ -4000,6 +4002,7 @@
"return the red component in percent [0..100]"
(red isNil and:[colorId notNil]) ifTrue:[
+ device isNil ifTrue:[^ 0].
device getRGBFrom:colorId into:[:r :g :b | ^ r].
].
red isNil ifTrue:[^ 0].
@@ -5335,7 +5338,7 @@
!Color class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/Color.st,v 1.193 2004-09-14 12:07:24 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/Color.st,v 1.194 2004-10-16 12:30:10 cg Exp $'
! !
Color initialize!