Fixed temporary files pathname, it could 'crash' before.

[www.jankratochvil.net.git] / project / Pod2Html.pm

diff --git a/project/Pod2Html.pm b/project/Pod2Html.pm
index dbcedd5..3c76248 100755 (executable)
--- a/project/Pod2Html.pm
+++ b/project/Pod2Html.pm
@@ -49,7 +49,8 @@ My::Web->heading();
 
 local *F;
 open F,"lynx -source ".$W->{"project_viewcvs"}."*checkout*/".$W->{"args"}{"cvs"}."?rev=HEAD"
-               ." |pod2html -"
+               # FIXME: "/tmp" - dangerous, not unique, currently creates: pod2htmd.tmp pod2htmi.tmp
+               ." |pod2html --cachedir=/tmp -"
                ." |";
 print $_ while <F>;
 close F;