# HG changeset patch
# User tz
# Date 909998221 -3600
# Node ID a5d37f30faa85c20a38e5755762156ee1aca0340
# Parent  9ddf012eba3e8ce0a9793d3716534a2d6a76bae5
multiple selection/first node=root/delete - error fixed

diff -r 9ddf012eba3e -r a5d37f30faa8 UIPainterView.st
--- a/UIPainterView.st	Tue Oct 27 14:42:47 1998 +0100
+++ b/UIPainterView.st	Mon Nov 02 10:17:01 1998 +0100
@@ -233,7 +233,8 @@
     coll notNil ifTrue:[
         treeView cvsEventsDisabledDo:[
 
-            (oldSelectedNode := (treeView model selectedNodes at: 1 ifAbsent: nil)) notNil ifTrue: [
+            ((oldSelectedNode := (treeView model selectedNodes at: 1 ifAbsent: nil)) notNil and:
+            [oldSelectedNode parent notNil]) ifTrue: [
                 oldSelectedNode parent children size <= 1 ifTrue: [
                     newSelectedNode := oldSelectedNode parent
                 ]