summaryrefslogtreecommitdiff
path: root/lib/Pod/Text.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Pod/Text.pm')
-rw-r--r--lib/Pod/Text.pm4
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);