diff options
Diffstat (limited to 'contrib/perl5/lib/Getopt')
| -rw-r--r-- | contrib/perl5/lib/Getopt/Long.pm | 6 | ||||
| -rw-r--r-- | contrib/perl5/lib/Getopt/Std.pm | 2 |
2 files changed, 4 insertions, 4 deletions
diff --git a/contrib/perl5/lib/Getopt/Long.pm b/contrib/perl5/lib/Getopt/Long.pm index 1966ef3c9117f..d17885d1b4d62 100644 --- a/contrib/perl5/lib/Getopt/Long.pm +++ b/contrib/perl5/lib/Getopt/Long.pm @@ -2,7 +2,7 @@ package Getopt::Long; -# RCS Status : $Id: GetoptLong.pl,v 2.18 1998-06-14 15:02:19+02 jv Exp $ +# RCS Status : $Id: Long.pm,v 1.1.1.1 1998/09/09 06:59:55 markm Exp $ # Author : Johan Vromans # Created On : Tue Sep 11 15:00:12 1990 # Last Modified By: Johan Vromans @@ -108,7 +108,7 @@ __END__ ################ AutoLoading subroutines ################ -# RCS Status : $Id: GetoptLongAl.pl,v 2.20 1998-06-14 15:02:19+02 jv Exp $ +# RCS Status : $Id: Long.pm,v 1.1.1.1 1998/09/09 06:59:55 markm Exp $ # Author : Johan Vromans # Created On : Fri Mar 27 11:50:30 1998 # Last Modified By: Johan Vromans @@ -137,7 +137,7 @@ sub GetOptions { print STDERR ("GetOpt::Long $Getopt::Long::VERSION ", "called from package \"$pkg\".", "\n ", - 'GetOptionsAl $Revision: 2.20 $ ', + 'GetOptionsAl $Revision: 1.1.1.1 $ ', "\n ", "ARGV: (@ARGV)", "\n ", diff --git a/contrib/perl5/lib/Getopt/Std.pm b/contrib/perl5/lib/Getopt/Std.pm index c2cd1234f4cf7..34c15f3540931 100644 --- a/contrib/perl5/lib/Getopt/Std.pm +++ b/contrib/perl5/lib/Getopt/Std.pm @@ -43,7 +43,7 @@ the argument or 1 if no argument is specified. @ISA = qw(Exporter); @EXPORT = qw(getopt getopts); -# $RCSfile: getopt.pl,v $$Revision: 4.1 $$Date: 92/08/07 18:23:58 $ +# $RCSfile: Std.pm,v $$Revision: 1.1.1.1 $$Date: 1998/09/09 06:59:55 $ # Process single-character switches with switch clustering. Pass one argument # which is a string containing all switches that take an argument. For each |