--- 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
                 ]