Removed indirect object syntax from OptionParser.pm

This commit is contained in:
Brian Fraser
2011-12-23 00:29:04 -03:00
parent 4cec08f768
commit 017f95e532

View File

@@ -200,7 +200,7 @@ sub get_specs {
%$attribs, %$attribs,
}; };
}; };
my $dsn_o = new OptionParser( my $dsn_o = OptionParser->new(
description => 'DSN OPTIONS', description => 'DSN OPTIONS',
head1 => 'DSN OPTIONS', head1 => 'DSN OPTIONS',
dsn => 0, # XXX don't infinitely recurse! dsn => 0, # XXX don't infinitely recurse!