--- a/InspectorView.st	Sat Mar 13 09:45:35 2010 +0100
+++ b/InspectorView.st	Sun Mar 14 00:36:24 2010 +0100
@@ -2183,7 +2183,7 @@
 doAccept:theText
     |sel newValue|
 
-    sel := listView at:selectionIndex.
+    sel := listView at:(self theSingleSelectionIndex).
     (sel startsWith:'-all') ifTrue:[
         workspace flash.
         ^ self.
@@ -2332,9 +2332,9 @@
 !InspectorView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.212 2010-03-10 21:33:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.213 2010-03-13 23:36:24 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.212 2010-03-10 21:33:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.213 2010-03-13 23:36:24 cg Exp $'
 ! !