_Targeted
{
 Ent._E4 unescape *persnorm
 dup _Hier.Lname eq$
 {
  pop
 }
 {
  _Hier.Left @
  nod@?
  {
   *hierlsav
  } if
  dup !Hier.Lname
  true exch *treeacts
  "Load" *persists
  "Default\Left.tlt" oflist Tree.Save pop
  _Hier.Left @
  "Load" *persists
%
% re-identify the left and right tree captions
%
  "Tabber(0);" 
  *hiernams

 } ifelse
}
{
} ifelse