%
% decisions for generic form type identification
%

|Editing
%
% no edit currently in process
% begin editing due to right click of tree node
%
% right click - deploy node branding
%
 pop

 _Edits any)?
 {
 }
 {

  *editnodf

 } ifelse

 true

|Engage
%
% left double clicked
%
 pop
 _Edits any)?
 {
 }
 {
%
% only edit the node if it is not the History content
%
  true !dclicker
  *valsnode
 } ifelse
 true

|Select
 pop
 Task.!Sel
 selected !\
 root?
 {
%
% no info
%
 }
 {
  empty
  "_fname" \_ length)
  {
%
% show file info
%
   *finftext
   &
  }
  {
  } ifelse
  "Body" \_ *enterval &
  Help.!
 } ifelse
 Task.@
 true