Commit e47049d7 authored by mkanat%bugzilla.org's avatar mkanat%bugzilla.org

Bug 346545: checksetup should show the name and version of the OS it's being run on

Patch By Max Kanat-Alexander <mkanat@bugzilla.org> (module owner) r=colin, a=myk
parent a5172adf
......@@ -224,6 +224,7 @@ use 5.008;
use File::Basename;
use Getopt::Long qw(:config bundling);
use Pod::Usage;
use POSIX ();
use Safe;
BEGIN { chdir dirname($0); }
......@@ -269,8 +270,19 @@ our %answer = %{read_answers_file()};
my $silent = scalar(keys %answer) && !$switch{'verbose'};
# Display version information
printf "\n*** This is Bugzilla " . BUGZILLA_VERSION . " on perl %vd ***\n",
$^V unless $silent;
unless ($silent) {
printf "\n* This is Bugzilla " . BUGZILLA_VERSION . " on perl %vd\n",
$^V;
my @os_details = POSIX::uname;
# 0 is the name of the OS, 2 is the major version,
my $os_name = $os_details[0] . ' ' . $os_details[2];
if (ON_WINDOWS) {
require Win32;
$os_name = Win32::GetOSName();
}
# 3 is the minor version.
print "* Running on $os_name $os_details[3]\n"
}
# Check required --MODULES--
my $module_results = check_requirements(!$silent);
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment