%
% detect new images and record the xact
%
% stack: [ . . . ] curpath
%
% process the directory for incoming files
%
empty !Camera.Latest
0 !Xact.Last
"_tamera_" text*conn

"*.jpg" !wilder
empty ofincom
_Camera.Latest
{
%
% stack: can-dir seed
%
 nextfile ?

 *camrincm

 "incoming" text!xact

 empty
%%% "Camera.Dir" sval
 "Camera.Latest" sval
 "Xact.Last" sval
 "_tamera_" text!conn

%
% determine the subject for incoming by looking backwards
% in the venue directory for the latest New suffix that
% predates the incoming images Camera.Modified
%
} loop
filing)
%
% camera directory and latest camera image
% may have been changed
%