%
% create cloud alternate for htm or html
%
% stack: html-content normal-dest
%

".htm" "-cloud.htm" replall
exch
*tackmkbg
exch
write

%
% cloud files must be corrected for http reference to fixed server
%
%%% pop2