--- a/Colormap.st	Thu May 30 11:56:13 1996 +0200
+++ b/Colormap.st	Thu May 30 16:35:03 1996 +0200
@@ -254,8 +254,26 @@
     "Modified: 2.5.1996 / 12:46:07 / cg"
 ! !
 
+!Colormap methodsFor:'storing'!
+
+storeOn:aStream
+    "append a representation to aStream, from which the receiver
+     can be reconstructed"
+
+    aStream nextPutAll:'(' , self class name ,' redVector:'.
+    redVector storeOn:aStream.
+    aStream nextPutAll:' greenVector:'.
+    greenVector storeOn:aStream.
+    aStream nextPutAll:' blueVector:'.
+    blueVector storeOn:aStream.
+    aStream nextPutAll:')'
+
+    "Created: 30.5.1996 / 16:28:27 / ca"
+    "Modified: 30.5.1996 / 16:32:44 / ca"
+! !
+
 !Colormap class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Colormap.st,v 1.13 1996-05-10 16:45:35 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Colormap.st,v 1.14 1996-05-30 14:35:03 ca Exp $'
 ! !