--- a/build_package.pl Mon Aug 10 14:26:42 2009 +0100
+++ b/build_package.pl Mon Aug 10 18:28:49 2009 +0100
@@ -39,6 +39,7 @@
my $sDiamondsTag = '';
my $bHudson = 0;
my $bPublish = 1;
+my $bHelp = 0;
GetOptions((
'configrepo=s' => \$sFbfConfigRepo,
'configdir=s' => \$sFbfConfigDir,
@@ -51,10 +52,11 @@
'production!' => \$bProduction,
'tag=s' => \$sDiamondsTag,
'hudson!' => \$bHudson,
- 'publish!' => \$bPublish
+ 'publish!' => \$bPublish,
+ 'help!' => \$bHelp
));
-if (!($sSubProject or $sFbfProjectRepo or $sFbfProjectDir))
+if ($bHelp or !($sSubProject or $sFbfProjectRepo or $sFbfProjectDir))
{
print "Usage: build_package.pl --subproj=RELPATH [OPTIONS]\n";
print " build_package.pl --projectrepo=REPO [OPTIONS]\n";