X-Git-Url: http://git.jankratochvil.net/?p=www.jankratochvil.net.git;a=blobdiff_plain;f=project%2FPod2Html.pm;h=365c66e84c0fa39038534babcdb4834315da6377;hp=1918d2017598807127f323fdad16d4019da8ef59;hb=4f7660c82e5f6edbc2a6fdc91628d3ec4d3024a3;hpb=6a162b9014ca199c2188c327fbc94888df758a03 diff --git a/project/Pod2Html.pm b/project/Pod2Html.pm index 1918d20..365c66e 100755 --- a/project/Pod2Html.pm +++ b/project/Pod2Html.pm @@ -36,6 +36,7 @@ my $W=My::Web->init( "cvs"=>'^[\w\d][\w\d/.]*$', }, ); +My::Web->heading(); $W->{"r"}->content_type("text/html"); @@ -47,6 +48,6 @@ print $_ while ; close F; -exit 0; +exit; } 1;