--- a/DebugView.st	Sat Feb 21 15:46:04 1998 +0100
+++ b/DebugView.st	Sat Feb 21 15:47:01 1998 +0100
@@ -2892,7 +2892,8 @@
         (mClass == DisplaySurface) ifTrue:[^ false].
     ].
 
-    sel == #do: ifTrue:[
+    (sel == #do:
+    or:[sel == #from:to:do:]) ifTrue:[
         mClass == Array ifTrue:[^ false].
         mClass == OrderedCollection ifTrue:[^ false].
     ].
@@ -3777,6 +3778,6 @@
 !DebugView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.189 1998-02-05 16:15:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.190 1998-02-21 14:47:01 cg Exp $'
 ! !
 DebugView initialize!