--- a/Depth4Image.st	Mon Aug 24 14:21:19 1998 +0200
+++ b/Depth4Image.st	Mon Aug 24 14:41:40 1998 +0200
@@ -955,15 +955,17 @@
             useFlags at:(byte bitAnd:2r1111)+1 put:true.
         ].
     ].
-    usedValues := OrderedCollection new.
-    1 to:16 do:[:i | (useFlags at:i) ifTrue:[usedValues add:(i-1)]].
-    ^ usedValues
+    ^ (0 to:15) select:[:i | useFlags at:(i+1)].
 
-    "Modified: 7.6.1996 / 19:09:14 / cg"
+"/    usedValues := OrderedCollection new.
+"/    1 to:16 do:[:i | (useFlags at:i) ifTrue:[usedValues add:(i-1)]].
+"/    ^ usedValues
+
+    "Modified: / 24.8.1998 / 13:56:59 / cg"
 ! !
 
 !Depth4Image class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Depth4Image.st,v 1.35 1998-08-07 14:48:54 tz Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Depth4Image.st,v 1.36 1998-08-24 12:41:40 cg Exp $'
 ! !