Magic-Mirror/gecko-dev
1
0
Fork 0
mirror of https://github.com/mozilla/gecko-dev.git synced 2024-12-04 11:26:09 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

fix broken parsing and handing of --help --version

Browse Source
This commit is contained in:
kestes%walrus.com 2001-10-05 22:42:12 +00:00
parent 133f72a1e6
commit 1e7c1746d5
1 changed files with 8 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
webtools/tinderbox2/src/clientbin/cull_archive_dirs
View File

@ -1,3 +1,6 @@
#!/usr/local/bin/perl
#!#perl# -T --
# This script does not need to run under taint perl.
@ -28,8 +31,8 @@
# complete rewrite by Ken Estes, Mail.com (kestes@staff.mail.com).
# Contributor(s):
# $Revision: 1.3 $
# $Date: 2001/10/05 22:10:14 $
# $Revision: 1.4 $
# $Date: 2001/10/05 22:42:12 $
# $Author: kestes%walrus.com $
# $Name: $
@ -81,7 +84,7 @@ EOF
;
die $usage;
print $usage;
}
@ -402,12 +405,12 @@ sub parse_args {
exit 1 ;
}
if($version) {
if($Prog_Args{'version'}) {
print "Version: $VERSION\n";
exit 0;
}
if ($help) {
if ($Prog_Args{'help'}) {
usage();
}