--- a/UIPainterView.st	Wed Apr 01 11:35:57 1998 +0200
+++ b/UIPainterView.st	Wed Apr 01 16:46:35 1998 +0200
@@ -1235,9 +1235,11 @@
 select:something
     "change selection to something
     "
-    (self enabled and:[something ~= self selection]) ifTrue:[
-        treeView cvsSelection:something.
-        self setSelection:something withRedraw:true.
+    (self enabled and:[something ~= self selection]) ifTrue:[   
+        something isNil 
+            ifTrue: [treeView selection: (Array with: 1)]
+            ifFalse:[treeView cvsSelection:something].
+        self setSelection:something withRedraw:true
     ]
 
 !