%
% save the current tree (page-based) for possible original tree restore
%
*ownwhere
&"("
&_Ent.Page

^"_" &".tlt" ofbin
dup !Tree.Spec