author | tz |
Mon, 02 Nov 1998 10:17:01 +0100 | |
changeset 1015 | a5d37f30faa8 |
parent 1014 | 9ddf012eba3e |
child 1016 | 2660d468dc61 |
UIPainterView.st | file | annotate | diff | comparison | revisions |
--- 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 ]