--- a/Colormap.st	Fri Mar 05 14:49:25 1999 +0100
+++ b/Colormap.st	Fri Mar 05 18:05:40 1999 +0100
@@ -294,6 +294,10 @@
 
 !Colormap methodsFor:'copying'!
 
+copyFrom:start to:stop
+    ^ self class withColors:(self asArray copyFrom:start to:stop)
+!
+
 postCopy
     redVector := redVector copy.
     greenVector := greenVector copy.
@@ -371,5 +375,5 @@
 !Colormap class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Colormap.st,v 1.25 1999-02-11 18:16:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Colormap.st,v 1.26 1999-03-05 17:05:40 tm Exp $'
 ! !