# HG changeset patch
# User tz
# Date 886460675 -3600
# Node ID 33365ca6eb1dd9ad3a51a4ab3d059b7015e61528
# Parent  5b5d08815af417321ec21bb7ac81e55acb3b975b
select items after pasting

diff -r 5b5d08815af4 -r 33365ca6eb1d HierarchicalListEditor.st
--- a/HierarchicalListEditor.st	Tue Feb 03 00:01:16 1998 +0100
+++ b/HierarchicalListEditor.st	Tue Feb 03 00:04:35 1998 +0100
@@ -1227,6 +1227,7 @@
     "paste after current selected item"
 
     treeView selectedNodeAdd:CopyBuffer.
+    CopyBuffer isCollection ifFalse: [treeView selectNode: CopyBuffer] ifTrue: [treeView selection: (CopyBuffer collect: [:node| treeView indexOfNode: node])].
     self updateChannels.
     isModified := true