call Utils->Version

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@1844 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
lissav 2008-07-07 19:04:37 +00:00
parent 02defb37b2
commit 042970679f
3 changed files with 22 additions and 19 deletions

View File

@ -3874,7 +3874,8 @@ sub parse_and_run_dcp
if ($options{'version'})
{
my %rsp;
$rsp->{data}->[0] = "Version 2.0";
my $version = xCAT::Utils->Version();
$rsp->{data}->[0] = "$version";
xCAT::MsgUtils->message("I", $rsp, $::CALLBACK);
exit(0);
}

View File

@ -16,7 +16,8 @@ sub parse_args {
my %opt = ();
my $cmd = $request->{command};
my $args = $request->{arg};
my @VERSION = qw( 2.0 );
my $vers =
my @VERSION = qw( 2.1 );
#############################################
# Responds with usage statement

View File

@ -3,6 +3,7 @@
package xCAT::Usage;
use Getopt::Long;
use xCAT::Utils;
#-------------------------------------------------------------------------------
=head1 xCAT::Usage
@ -110,24 +111,24 @@ my %usage = (
"Usage: lsslp [-h|--help|-v|--version]
lsslp [-V|--verbose][-b ip[,ip..]][-w][-r|-x|-z][-s BPA|MM|IVM|RSA|FSP|HMC]"
);
my $vers = xCAT::Utils->Version();
my %version = (
"rnetboot" => "Version 2.0",
"rpower" => "Version 2.0",
"rbeacon" => "Version 2.0",
"rvitals" => "Version 2.0",
"reventlog" => "Version 2.0",
"rinv" => "Version 2.0",
"rsetboot" => "Version 2.0",
"rbootseq" => "Version 2.0",
"rscan" => "Version 2.0",
"rspconfig" => "Version 2.0",
"getmacs" => "Version 2.0",
"mkvm" => "Version 2.0",
"lsvm" => "Version 2.0",
"chvm" => "Version 2.0",
"rmvm" => "Version 2.0",
"lsslp" => "Version 2.0"
"rnetboot" => "$vers",
"rpower" => "$vers",
"rbeacon" => "$vers",
"rvitals" => "$vers",
"reventlog" => "$vers",
"rinv" => "$vers",
"rsetboot" => "$vers",
"rbootseq" => "$vers",
"rscan" => "$vers",
"rspconfig" => "$vers",
"getmacs" => "$vers",
"mkvm" => "$vers",
"lsvm" => "$vers",
"chvm" => "$vers",
"rmvm" => "$vers",
"lsslp" => "$vers"
);
#--------------------------------------------------------------------------------