HierarchicalListEditor.st
changeset 559 33365ca6eb1d
parent 558 5b5d08815af4
child 562 f16b2ca2be5b
equal deleted inserted replaced
558:5b5d08815af4 559:33365ca6eb1d
  1225 
  1225 
  1226 doPaste
  1226 doPaste
  1227     "paste after current selected item"
  1227     "paste after current selected item"
  1228 
  1228 
  1229     treeView selectedNodeAdd:CopyBuffer.
  1229     treeView selectedNodeAdd:CopyBuffer.
       
  1230     CopyBuffer isCollection ifFalse: [treeView selectNode: CopyBuffer] ifTrue: [treeView selection: (CopyBuffer collect: [:node| treeView indexOfNode: node])].
  1230     self updateChannels.
  1231     self updateChannels.
  1231     isModified := true
  1232     isModified := true
  1232 
  1233 
  1233 !
  1234 !
  1234 
  1235