--- a/Tools_BrowserList.st	Tue Feb 14 15:31:02 2006 +0100
+++ b/Tools_BrowserList.st	Tue Feb 14 15:31:12 2006 +0100
@@ -548,8 +548,13 @@
 
     selectionHolder := self selectionHolder.
     prevSelection := selectionHolder value.
-    selectionHolder setValue:nil.
-    selectionHolder value:prevSelection.
+
+    selectionHolder class == ValueHolder ifTrue:[
+        selectionHolder changed:#value with:prevSelection.
+    ] ifFalse:[
+        selectionHolder setValue:nil.
+        selectionHolder value:prevSelection.
+    ]
 !
 
 forceSelectionClear
@@ -1240,5 +1245,5 @@
 !BrowserList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_BrowserList.st,v 1.10 2006-01-09 08:55:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_BrowserList.st,v 1.11 2006-02-14 14:31:12 cg Exp $'
 ! !