--- a/SelectionInListModelView.st	Thu Mar 28 09:14:19 2019 +0100
+++ b/SelectionInListModelView.st	Thu Mar 28 15:35:50 2019 +0100
@@ -2623,6 +2623,7 @@
 selectElements:aCollectionOfElements ifAnyAbsent:exceptionalValue
     |indices setOfElements searchStart|
 
+"/ Transcript show:'view index search time:'; showCR:(Time millisecondsToRun:[
     aCollectionOfElements size > 10 ifTrue:[
         setOfElements := aCollectionOfElements asIdentitySet.
         indices := (1 to:list size) select:[:idx |
@@ -2651,6 +2652,7 @@
                         idx.
                    ].
     ].
+"/ ]).
     self selection:indices
 !