%
% replace the nodes body attribute
%
% stack: body-text edit-mode
%
*edtrsavz
nod@
*(+