undef $fh before opening

master
Joey Hess 2008-07-08 12:16:36 -04:00
parent 6fc21e9d3d
commit 6f3c980e2b
2 changed files with 3 additions and 0 deletions

View File

@ -142,6 +142,7 @@ sub formbuilder (@) { #{{{
if (! defined $fh || ! ref $fh) { if (! defined $fh || ! ref $fh) {
# even that doesn't always work, # even that doesn't always work,
# fall back to opening the tempfile # fall back to opening the tempfile
$fh=undef;
open($fh, "<", $tempfile) || error("failed to open $tempfile: $!"); open($fh, "<", $tempfile) || error("failed to open $tempfile: $!");
} }
} }

View File

@ -70,6 +70,8 @@ the error message like below:
>>>>>>>> I can rebuild Debian stable source package with CGI for Perl. Maybe it will help me? What do you think? --[[Paweł|ptecza]] >>>>>>>> I can rebuild Debian stable source package with CGI for Perl. Maybe it will help me? What do you think? --[[Paweł|ptecza]]
>>>>>>>>> Silly thinko on my part, fixed that in git.. --[[Joey]]
The same message I can see in the Apache log file. There is also The same message I can see in the Apache log file. There is also
following warning: following warning: