--- a/Color.st Wed Jan 09 12:41:35 2008 +0100
+++ b/Color.st Wed Jan 09 13:11:12 2008 +0100
@@ -5040,14 +5040,19 @@
"do nothing here, for compatibility with Image/Form"
! !
-!Color methodsFor:'printing & storing'!
+!Color methodsFor:'object persistency'!
elementDescriptorFor:aspect
+ "support for persistency:
+ answer the elements to be made persistent with an ObjectCoder"
+
red isNil ifTrue:[
^ Array with:(#colorId->colorId)
].
^ Array with:(#red->self red) with:(#green->self green) with:(#blue->self blue)
-!
+! !
+
+!Color methodsFor:'printing & storing'!
hex
<resource: #obsolete>
@@ -5450,7 +5455,7 @@
!Color class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/Color.st,v 1.207 2008-01-09 11:41:35 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/Color.st,v 1.208 2008-01-09 12:11:12 cg Exp $'
! !
Color initialize!