diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/Pod/Text.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Pod/Text.pm b/lib/Pod/Text.pm index 671a64bf7e..ac4f72b688 100644 --- a/lib/Pod/Text.pm +++ b/lib/Pod/Text.pm @@ -87,7 +87,7 @@ $DEF_INDENT = 4; $indent = $DEF_INDENT; $needspace = 0; -open(IN, shift) || die "Couldn't open file!\n"; +open(IN, $file) || die "Couldn't open $file: $!"; POD_DIRECTIVE: while (<IN>) { if ($cutting) { @@ -213,7 +213,7 @@ sub prepare_for_output { { if (length() + 3 < $indent) { my $paratag = $_; - $_ = <>; + $_ = <IN>; if (/^=/) { # tricked! local($indent) = $indent[$#index - 1] || $DEF_INDENT; output($paratag); |