From 0265a53c1309071b202422225725087393a2ed56 Mon Sep 17 00:00:00 2001 From: "mkanat%bugzilla.org" <> Date: Tue, 2 Sep 2008 10:47:00 +0000 Subject: Bug 451707: Provide a --version option to checksetup.pl Patch By Max Kanat-Alexander r=LpSolit, a=mkanat --- checksetup.pl | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) (limited to 'checksetup.pl') diff --git a/checksetup.pl b/checksetup.pl index 6969b5b6b..d7a787f48 100755 --- a/checksetup.pl +++ b/checksetup.pl @@ -66,7 +66,7 @@ $ENV{'HTTP_ACCEPT_LANGUAGE'} ||= get_console_locale(); my %switch; GetOptions(\%switch, 'help|h|?', 'check-modules', 'no-templates|t', 'verbose|v|no-silent', 'make-admin=s', - 'reset-password=s'); + 'reset-password=s', 'version|V'); # Print the help message if that switch was selected. pod2usage({-verbose => 1, -exitval => 1}) if $switch{'help'}; @@ -77,6 +77,7 @@ my $answers_file = $ARGV[0]; my $silent = $answers_file && !$switch{'verbose'}; print(install_string('header', get_version_and_os()) . "\n") unless $silent; +exit if $switch{'version'}; # Check required --MODULES-- my $module_results = check_requirements(!$silent); Bugzilla::Install::Requirements::print_module_instructions( @@ -242,7 +243,7 @@ checksetup.pl - A do-it-all upgrade and installation script for Bugzilla. =head1 SYNOPSIS - ./checksetup.pl [--help|--check-modules] + ./checksetup.pl [--help|--check-modules|--version] ./checksetup.pl [SCRIPT [--verbose]] [--no-templates|-t] [--make-admin=user@domain.com] [--reset-password=user@domain.com] @@ -288,6 +289,11 @@ by developers to speed up checksetup.) Use this switch at your own risk. Output results of SCRIPT being processed. +=item B<--version> + +Display the version of Bugzilla, Perl, and some info about the +system that Bugzilla is being installed on, and then exit. + =back =head1 DESCRIPTION -- cgit v1.2.3-24-g4f1b