%
% copy the basis of captured images to where the WowSlider expects it
%
% stack: xact
%
 "Wow\Moading" _dcount letter & &"\data1" ofapp "data1\" oftack
"mka" log)(
 dup !dtack copydir
 dup !Xact
 "Wow\Moading" _dcount letter & &"\engine1" ofapp "engine1\" oftack
"mkb" log)(
 dup !etack copydir
%
% stack: xact
%
 dup !Xact
%
% make a lookup for uploading for only changed files
%
%%% _Tack
%%%&" !Clup.Xact
"
_Clup.Filer
<
|holder "
!Uploader

0 !counter
"xact_" textwild
empty oftack
empty
third
"tackmkay" log)(
!Xact
%
% stack: xact tack-dir seed
%
{
 nextfile ?
 "va.jpg" "ga.jpg" *tackmkaj
} loop
filing)
_Uploader
"index.htm"		 look&dup
"index.html"		 look&dup
"Xacts.html"		 look&dup
"Tacker.html"		 look&dup
"engine1\script.js"	look&dup
"engine1\style.css"	look&dup
"wowslider.html"	look&dup
_counter 2 prezero ^"data1\images\ma" jpg look&dup
_counter 2 prezero ^"data1\thumbnails\ma" jpg look&dup
_counter 2 prezero ^"data1\tooltips\ma" jpg
_counter 1 eq
{
 look&dup
"AqNanv.html"		 look&dup
"engine1\jquery.js"		 look&dup
"engine1\loading.gif"		 look&dup
"engine1\style.mod.css"		 look&dup
"engine1\wowslider.js"		 look&dup
"engine1\wowslider.mod.js"		 look&dup
"engine1\ws-ctrl-convex.eot"		 look&dup
"engine1\ws-ctrl-convex.svg"		 look&dup
"engine1\ws-ctrl-convex.ttf"		 look&dup
"engine1\ws-ctrl-convex.woff"		 look&

}
{
 look&
} ifelse

&">
"
"Uploader.txt" ofxact write