--- a/DoWhatIMeanSupport.st Tue Nov 04 14:51:49 2008 +0100
+++ b/DoWhatIMeanSupport.st Tue Nov 04 19:45:33 2008 +0100
@@ -831,7 +831,7 @@
|nodes|
allowErrors ifTrue:[
- nodes := nodesSoFar
+ nodes := nodesSoFar asOrderedCollection
collect:[:nd | nd whichNodeIntersects:interval]
thenSelect:[:nd | nd notNil ].
nodes size == 1 ifTrue:[
@@ -1761,5 +1761,5 @@
!DoWhatIMeanSupport class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/DoWhatIMeanSupport.st,v 1.46 2008-11-04 13:51:49 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/DoWhatIMeanSupport.st,v 1.47 2008-11-04 18:45:33 cg Exp $'
! !