arif/xcat-core
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

use 'verbose' instead of 'Verbose' option to match the command usage in Usage.pm.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@13206 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
zhaoertao 2012-06-29 09:03:22 +00:00
parent e532ea48ae
commit 0c5453290d
12 changed files with 18 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
perl-xCAT/xCAT/FSPbootseq.pm
View File

@ -47,7 +47,7 @@ sub parse_args {
$Getopt::Long::ignorecase = 0;
Getopt::Long::Configure( "bundling" );
if ( !GetOptions( \%opt,qw(h|help V|Verbose v|version ))) {
if ( !GetOptions( \%opt,qw(h|help V|verbose v|version ))) {
return( usage() );
}
####################################

2
perl-xCAT/xCAT/FSPcfg.pm
View File

@ -173,7 +173,7 @@ sub parse_args {
Getopt::Long::Configure( "bundling" );
$request->{method} = undef;
if ( !GetOptions( \%opt, qw(V|Verbose resetnet))) {
if ( !GetOptions( \%opt, qw(V|verbose resetnet))) {
return( usage() );
}
####################################

6
perl-xCAT/xCAT/FSPconn.pm
View File

@ -57,7 +57,7 @@ sub mkhwconn_parse_args
$Getopt::Long::ignorecase = 0;
Getopt::Long::Configure( "bundling" );
if ( !GetOptions( \%opt, qw(V|Verbose h|help t s:s T=s p=s P=s port=s ) )) {
if ( !GetOptions( \%opt, qw(V|verbose h|help t s:s T=s p=s P=s port=s ) )) {
return( usage() );
}
@ -322,7 +322,7 @@ sub lshwconn_parse_args
return $opttmp;
}
if ( !GetOptions( \%opt, qw(V|Verbose h|help T=s s) )) {
if ( !GetOptions( \%opt, qw(V|verbose h|help T=s s) )) {
return( usage() );
}
return usage() if ( exists $opt{h});
@ -439,7 +439,7 @@ sub rmhwconn_parse_args
$Getopt::Long::ignorecase = 0;
Getopt::Long::Configure( "bundling" );
if ( !GetOptions( \%opt, qw(V|Verbose h|help T=s s) )) {
if ( !GetOptions( \%opt, qw(V|verbose h|help T=s s) )) {
return( usage() );
}
return usage() if ( exists $opt{h});

2
perl-xCAT/xCAT/FSPinv.pm
View File

@ -66,7 +66,7 @@ sub parse_args {
$Getopt::Long::ignorecase = 0;
Getopt::Long::Configure( "bundling" );
if ( !GetOptions( \%opt, qw(V|Verbose x) )) {
if ( !GetOptions( \%opt, qw(V|verbose x) )) {
return( usage() );
}
####################################

8
perl-xCAT/xCAT/FSPvm.pm
View File

@ -109,7 +109,7 @@ sub chvm_parse_args {
$Getopt::Long::ignorecase = 0;
Getopt::Long::Configure( "bundling" );
if ( !GetOptions( \%opt, qw(V|Verbose p=s i=s m=s r=s ) )) {
if ( !GetOptions( \%opt, qw(V|verbose p=s i=s m=s r=s ) )) {
return( usage() );
}
####################################
@ -361,7 +361,7 @@ sub mkvm_parse_args {
# if ( !GetOptions( \%opt, qw(V|verbose ibautocfg ibacap=s i=s l=s c=s p=s full) )) {
# return( usage() );
# }
if ( !GetOptions( \%opt, qw(V|Verbose i=s m=s r=s ) )) {
if ( !GetOptions( \%opt, qw(V|verbose i=s m=s r=s ) )) {
return( usage() );
}
####################################
@ -535,7 +535,7 @@ sub rmvm_parse_args {
$Getopt::Long::ignorecase = 0;
Getopt::Long::Configure( "bundling" );
if ( !GetOptions( \%opt, qw(V|Verbose service r) )) {
if ( !GetOptions( \%opt, qw(V|verbose service r) )) {
return( usage() );
}
return(usage( "rmvm doesn't support for Power 775." ));
@ -592,7 +592,7 @@ sub lsvm_parse_args {
$Getopt::Long::ignorecase = 0;
Getopt::Long::Configure( "bundling" );
if ( !GetOptions( \%opt, qw(V|Verbose l|long) )) {
if ( !GetOptions( \%opt, qw(V|verbose l|long) )) {
return( usage() );
}
####################################

2
perl-xCAT/xCAT/PPCcfg.pm
View File

@ -123,7 +123,7 @@ sub parse_args {
Getopt::Long::Configure( "bundling" );
$request->{method} = undef;
if ( !GetOptions( \%opt, qw(V|Verbose resetnet))) {
if ( !GetOptions( \%opt, qw(V|verbose resetnet))) {
return( usage() );
}
####################################

2
perl-xCAT/xCAT/PPCinv.pm
View File

@ -59,7 +59,7 @@ sub parse_args {
$Getopt::Long::ignorecase = 0;
Getopt::Long::Configure( "bundling" );
if ( !GetOptions( \%opt, qw(V|Verbose) )) {
if ( !GetOptions( \%opt, qw(V|verbose) )) {
return( usage() );
}
####################################

2
perl-xCAT/xCAT/PPCmac.pm
View File

@ -46,7 +46,7 @@ sub parse_args {
$Getopt::Long::ignorecase = 0;
Getopt::Long::Configure( "bundling" );
if ( !GetOptions( \%opt,qw(h|help V|Verbose v|version C=s G=s S=s D d f M o F=s arp))) {
if ( !GetOptions( \%opt,qw(h|help V|verbose v|version C=s G=s S=s D d f M o F=s arp))) {
return( usage() );
}
####################################

2
perl-xCAT/xCAT/PPCpower.pm
View File

@ -40,7 +40,7 @@ sub parse_args {
$Getopt::Long::ignorecase = 0;
Getopt::Long::Configure( "bundling" );
if ( !GetOptions( \%opt, qw(V|Verbose m:s@ t=s T=s r=s nodeps) )) {
if ( !GetOptions( \%opt, qw(V|verbose m:s@ t=s T=s r=s nodeps) )) {
return( usage() );
}
####################################

2
perl-xCAT/xCAT/PPCscan.pm
View File

@ -74,7 +74,7 @@ sub parse_args {
$Getopt::Long::ignorecase = 0;
Getopt::Long::Configure( "bundling" );
if ( !GetOptions( \%opt, qw(V|Verbose u w x z) )){
if ( !GetOptions( \%opt, qw(V|verbose u w x z) )){
return( usage() );
}
####################################

2
perl-xCAT/xCAT/PPCvitals.pm
View File

@ -40,7 +40,7 @@ sub parse_args {
$Getopt::Long::ignorecase = 0;
Getopt::Long::Configure( "bundling" );
if ( !GetOptions( \%opt, qw(V|Verbose) )) {
if ( !GetOptions( \%opt, qw(V|verbose) )) {
return( usage() );
}
####################################

4
perl-xCAT/xCAT/Usage.pm
View File

@ -90,7 +90,7 @@ my %usage = (
"rbootseq" =>
"Usage:
Common:
rbootseq [-h|--help|-v|--version|-V|--Verbose]
rbootseq [-h|--help|-v|--version|-V|--verbose]
Blade specific:
rbootseq <noderange> [hd0|hd1|hd2|hd3|net|iscsi|usbflash|floppy|none],...
PPC (using Direct FSP Management) specific:
@ -101,7 +101,7 @@ my %usage = (
"rspconfig" =>
"Usage:
Common:
rspconfig [-h|--help|-v|--version|-V|--Verbose]
rspconfig [-h|--help|-v|--version|-V|--verbose]
BMC/MPA Common:
rspconfig <noderange> [snmpdest|alert|community] [-V|--verbose]
rspconfig <noderange> [snmpdest=<dest ip address>|alert=<on|off|en|dis|enable|disable>|community=<string>]