colors: 'gray' instead of 'grey'
parent
7c6b7762f9
commit
1c61b7734c
|
@ -14,7 +14,7 @@ TUPLE: rgba < color red green blue alpha ;
|
||||||
|
|
||||||
TUPLE: hsva < color hue saturation value alpha ;
|
TUPLE: hsva < color hue saturation value alpha ;
|
||||||
|
|
||||||
TUPLE: grey < color grey alpha ;
|
TUPLE: gray < color gray alpha ;
|
||||||
|
|
||||||
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
||||||
|
|
||||||
|
@ -26,7 +26,7 @@ METHOD: >rgba { hsva }
|
||||||
{ [ hue>> ] [ saturation>> ] [ value>> ] [ alpha>> ] } cleave 4array
|
{ [ hue>> ] [ saturation>> ] [ value>> ] [ alpha>> ] } cleave 4array
|
||||||
[ hsv>rgb ] [ peek ] bi suffix first4 rgba boa ;
|
[ hsv>rgb ] [ peek ] bi suffix first4 rgba boa ;
|
||||||
|
|
||||||
METHOD: >rgba { grey } [ grey>> dup dup ] [ alpha>> ] bi rgba boa ;
|
METHOD: >rgba { gray } [ gray>> dup dup ] [ alpha>> ] bi rgba boa ;
|
||||||
|
|
||||||
METHOD: >rgba { array } first4 rgba boa ;
|
METHOD: >rgba { array } first4 rgba boa ;
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue