update fake packages with function expecting any number of arguments (reduce perl_checker SNR)

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) = @_ }