%
% bring up task function window
%
false !dclicker

_Hier.Left @
Tree.Off

%
% was this left button click
%
_NodeC.Button _Mouse.Right and
zero
{
 _NodeC.Index
"LclkLeft " log()
 selnode
}
{
%
% right-click
%
 _NodeC.Index
"RclkLeft " log()
 selnode
 true _\ Tree.!Selected
 _\ "CopyOne" do
 _@ !src@ _\ !src\

} ifelse

Tree.On