diff options
Diffstat (limited to 'util')
-rwxr-xr-x | util/fix-pod2html.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/util/fix-pod2html.pl b/util/fix-pod2html.pl index fa51400..ff0176e 100755 --- a/util/fix-pod2html.pl +++ b/util/fix-pod2html.pl @@ -22,7 +22,7 @@ my $p = HTML::Parser->new(api_version => 3); $p->handler(start => \&startsub, 'tagname, text'); $p->handler(end => \&endsub, 'tagname, text'); $p->handler(default => sub { print shift() }, 'text'); -$p->parse_file(shift||"-") or die("parse: $!"); +$p->parse_file(shift||\*STDIN) or die("parse: $!"); my @stack; my $a=0; |