# HG changeset patch
# User tz
# Date 891441995 -7200
# Node ID ca9488ba987615933401ec39c12481cc4374c73a
# Parent  f0c325edcc6c51b1286683ff5e93dde1b69dbbf6
selection order changed (step 2)

diff -r f0c325edcc6c -r ca9488ba9876 UIPainterView.st
--- 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
     ]
 
 !