--- a/Color.st Sat Sep 05 00:41:56 2009 +0200
+++ b/Color.st Tue Sep 08 19:19:48 2009 +0200
@@ -1022,14 +1022,15 @@
^ self
name:colorName
- ifIllegal:[InvalidColorNameSignal
- raiseRequestWith:colorName
- errorString:' : ' , colorName]
-
- "
- Color name:'brown'
+ ifIllegal:[
+ InvalidColorNameSignal
+ raiseRequestWith:colorName errorString:' : ' , colorName
+ ]
+
+ "
+ Color name:'brown'
+ Color name:'snow'
Color name:'foo'
- Color name:'snow'
"
"Modified: 4.4.1997 / 15:32:33 / cg"
@@ -1071,7 +1072,8 @@
Color name:'brown' ifIllegal:[Color black]
Color name:'red' ifIllegal:[Color black]
Color name:'fuchsia' ifIllegal:[Color black]
- Color name:'foo' ifIllegal:[Color black]
+ Color name:'foo' ifIllegal:[Color black]
+ Color name:'foo' ifIllegal:[nil]
"
"Modified: 6.3.1997 / 02:32:41 / cg"
@@ -5544,7 +5546,7 @@
!Color class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/Color.st,v 1.216 2009-01-12 08:56:36 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/Color.st,v 1.217 2009-09-08 17:19:48 cg Exp $'
! !
Color initialize!