--- a/Color.st	Wed Mar 25 15:27:20 2015 +0100
+++ b/Color.st	Wed Mar 25 19:26:02 2015 +0100
@@ -4498,6 +4498,13 @@
 
 !Color methodsFor:'converting'!
 
+asByteArray
+    ^ByteArray
+            with: self redByte
+            with: self greenByte  
+            with: self blueByte  
+!
+
 fromLiteralArrayEncoding:encoding
     "read my values from an encoding.
      The encoding is supposed to be either of the form:
@@ -5623,11 +5630,11 @@
 !Color class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Color.st,v 1.238 2015-02-26 22:15:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Color.st,v 1.239 2015-03-25 18:26:02 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview/Color.st,v 1.238 2015-02-26 22:15:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Color.st,v 1.239 2015-03-25 18:26:02 cg Exp $'
 ! !