changeset 6156 | 2f7f8fc3abe1 |
parent 5667 | a213756b3b4d |
--- a/SelectionInTree.st Tue Sep 17 11:17:29 2019 +0200 +++ b/SelectionInTree.st Thu Sep 19 12:13:53 2019 +0200 @@ -836,13 +836,14 @@ ! selectedNode - "returns the selected node or nil" + "returns the first selected node or nil" |nodes| + (nodes := self selectedNodes) notNil ifTrue: [ ^nodes first ]. - ^nil + ^ nil "Modified (comment): / 04-02-2017 / 19:41:04 / cg" !