aboutsummaryrefslogtreecommitdiffstats
path: root/gendistrib
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@mandriva.org>2005-09-28 10:38:56 +0000
committerRafael Garcia-Suarez <rgarciasuarez@mandriva.org>2005-09-28 10:38:56 +0000
commit17b600293482c5414fc3b2663129021646799cd6 (patch)
tree0df627c2cfb81c056642ec0570fe135e76d629e7 /gendistrib
parent6378a14b26a7aa40327e2f44e238540c47858e5c (diff)
downloadrpmtools-17b600293482c5414fc3b2663129021646799cd6.tar
rpmtools-17b600293482c5414fc3b2663129021646799cd6.tar.gz
rpmtools-17b600293482c5414fc3b2663129021646799cd6.tar.bz2
rpmtools-17b600293482c5414fc3b2663129021646799cd6.tar.xz
rpmtools-17b600293482c5414fc3b2663129021646799cd6.zip
Add --version option. Suppress idiotic -s option alias.
Diffstat (limited to 'gendistrib')
-rwxr-xr-xgendistrib23
1 files changed, 11 insertions, 12 deletions
diff --git a/gendistrib b/gendistrib
index ed98c2b..cfa70b5 100755
--- a/gendistrib
+++ b/gendistrib
@@ -1,8 +1,6 @@
#!/usr/bin/perl
-#
-# $Id$
-#
+(our $VERSION) = q$Id$ =~ /(\d+\.\d+)/;
#- Copyright (C) 1999-2005 Mandrakesoft
#-
@@ -64,24 +62,25 @@ EOF
my %urpmfiles;
GetOptions(
- 'help|h' => sub { usage(); exit },
+ 'blind' => \my $blind,
'compss=s' => \$urpmfiles{compss},
'depslist=s' => \$urpmfiles{depslist},
+ 'destdir=s' => \my $destdir,
'distrib=s' => \my $rootdistrib,
- 'fermetagueule|s' => \my $nooutput,
'hdlists=s' => \$urpmfiles{hdlists},
- 'mediacfg=s' => \$urpmfiles{mediacfg},
'headersdir=s' => \$headers_dir,
+ 'help|h' => sub { usage(); exit 0; },
+ 'mediacfg=s' => \$urpmfiles{mediacfg},
'nobadrpm' => \my $dontdie,
- 'skipmissingdir' => \my $skipmissingdir,
'nochkdep' => \my $nochkdep,
'noclean' => \my $noclean,
- 'provides=s' => \$urpmfiles{provides},
- 'nomediainfo' => \my $nomediainfo,
- 'nomd5sum' => \my $nomd5sum,
'noemptymedia' => \my $noemptymedia,
- 'destdir=s' => \my $destdir,
- 'blind' => \my $blind,
+ 'nomd5sum' => \my $nomd5sum,
+ 'nomediainfo' => \my $nomediainfo,
+ 'provides=s' => \$urpmfiles{provides},
+ 'skipmissingdir' => \my $skipmissingdir,
+ 's' => \my $nooutput,
+ 'v|version' => sub { warn "$0 version $VERSION\n"; exit 0 },
);
my @root = grep { $_ } ($rootdistrib, @ARGV);