summaryrefslogtreecommitdiff
path: root/ext/Pod-Html/lib/Pod/Html.pm
diff options
context:
space:
mode:
Diffstat (limited to 'ext/Pod-Html/lib/Pod/Html.pm')
-rw-r--r--ext/Pod-Html/lib/Pod/Html.pm12
1 files changed, 6 insertions, 6 deletions
diff --git a/ext/Pod-Html/lib/Pod/Html.pm b/ext/Pod-Html/lib/Pod/Html.pm
index 46ff0da9ea..cb0f6b8152 100644
--- a/ext/Pod-Html/lib/Pod/Html.pm
+++ b/ext/Pod-Html/lib/Pod/Html.pm
@@ -574,16 +574,16 @@ sub _save_page {
sub write_file {
my ($globals, $output) = @_;
$globals->{Htmlfile} = "-" unless $globals->{Htmlfile}; # stdout
- my $FHOUT;
+ my $fhout;
if($globals->{Htmlfile} and $globals->{Htmlfile} ne '-') {
- open $FHOUT, ">", $globals->{Htmlfile}
+ open $fhout, ">", $globals->{Htmlfile}
or die "$0: cannot open $globals->{Htmlfile} file for output: $!\n";
} else {
- open $FHOUT, ">-";
+ open $fhout, ">-";
}
- binmode $FHOUT, ":utf8";
- print $FHOUT $output;
- close $FHOUT or die "Failed to close $globals->{Htmlfile}: $!";
+ binmode $fhout, ":utf8";
+ print $fhout $output;
+ close $fhout or die "Failed to close $globals->{Htmlfile}: $!";
chmod 0644, $globals->{Htmlfile} unless $globals->{Htmlfile} eq '-';
}