summaryrefslogtreecommitdiffstats
path: root/fake_packages/Getopt/Long.pm
diff options
context:
space:
mode:
Diffstat (limited to 'fake_packages/Getopt/Long.pm')
-rw-r--r--fake_packages/Getopt/Long.pm8
1 files changed, 4 insertions, 4 deletions
diff --git a/fake_packages/Getopt/Long.pm b/fake_packages/Getopt/Long.pm
index dad875e..a8a14ac 100644
--- a/fake_packages/Getopt/Long.pm
+++ b/fake_packages/Getopt/Long.pm
@@ -2,10 +2,10 @@
package Getopt::Long;
our @ISA = qw();
sub ConfigDefaults() {}
-sub Configure { my ($_o_options) = @_ }
+sub Configure { my (@_more_paras) = @_ }
sub FindOption { my ($_argv, $_prefix, $_argend, $_opt, $_o_opctl) = @_ }
sub GetOptions(@) {}
-sub GetOptionsFromArray(@) { my ($_argv, $_o_optionlist) = @_ }
+sub GetOptionsFromArray(@) { my ($_argv, @_more_paras) = @_ }
sub GetOptionsFromString(@) {}
sub HelpMessage(@) {}
sub OptCtl { my ($_o_v) = @_ }
@@ -20,10 +20,10 @@ sub setup_pa_args($@) {}
package Getopt::Long::CallBack;
our @ISA = qw();
sub name() {}
-sub new { my ($_pkg, $_o_atts) = @_ }
+sub new { my ($_pkg, @_more_paras) = @_ }
package Getopt::Long::Parser;
our @ISA = qw();
sub configure() {}
sub getoptions() {}
-sub new { my ($_o_atts) = @_ }
+sub new { my (@_more_paras) = @_ }