From 3d317ca092cec05ad9dcdd3815d74bedbd9f3412 Mon Sep 17 00:00:00 2001 From: "lpsolit%gmail.com" <> Date: Mon, 3 Jul 2006 15:53:24 +0000 Subject: Bug 328186: checksetup.pl should display the version of Bugzilla - Patch by RĂ©mi Zara r=mkanat a=justdave MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- checksetup.pl | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'checksetup.pl') diff --git a/checksetup.pl b/checksetup.pl index 349ac0b46..cde371641 100755 --- a/checksetup.pl +++ b/checksetup.pl @@ -161,6 +161,7 @@ sub help_page { my $programname = $0; $programname =~ s#^\./##; print "$programname - checks your setup and updates your Bugzilla installation\n"; + printf "Version: " . BUGZILLA_VERSION . " on perl %vd\n", $^V; print "\nUsage: $programname [SCRIPT [--verbose]] [--check-modules|--help]\n"; print " [--no-templates]\n"; print "\n"; @@ -197,6 +198,12 @@ if ($ARGV[0] && ($ARGV[0] !~ /^-/)) { $silent = !grep(/^--no-silent$/, @ARGV) && !grep(/^--verbose$/, @ARGV); } +########################################################################### +# Display version information +########################################################################### + +printf "\n*** This is Bugzilla " . BUGZILLA_VERSION . " on perl %vd ***\n", $^V unless $silent; + ########################################################################### # Check required module ########################################################################### -- cgit v1.2.3-24-g4f1b