%
% copy jpg or png psm versions
%
% stack: info-file
%
"cusvedtd" log)(
*doneactx

__ChgJpeg_ "true" eq$
{
%
% create a new incoming image from the edited original
%
 *xactninf
 "incedit.jpg" ofxact
"original" log)(
 _Camera.Original "_" 0 11 1 parse noext
 pop
 &"_1.xab"
 ^"6_"
 pop2nd
 exch dupnzis
 {
 }
 {
  4
 } ifelse
 exch
 ^"_" &
 ^"_" &
 ^"_" &
 ^"_" &
 ^"_" &
 ^"_" &
 ^"_" &
 ^"_" &

 ofcur
"remake" log)(
dup logs
 dup tuck
 copyfile
 ".gpj" overext 
}
{
} ifelse

"EditBar(false);
"
Help.!
*phyfront(