Fixing bug 3876, reutrn with usage if no kitcomponent specified to addkitcomp/rmkitcomp
This commit is contained in:
		@@ -1790,12 +1790,13 @@ sub addkitcomp
 | 
			
		||||
    my $rc;
 | 
			
		||||
 | 
			
		||||
    my $xusage = sub {
 | 
			
		||||
        my $ret = shift;
 | 
			
		||||
        my %rsp;
 | 
			
		||||
        push@{ $rsp{data} }, "Usage: addkitcomp - Add a Kit component to an xCAT osimage.";
 | 
			
		||||
        push@{ $rsp{data} }, "\taddkitcomp [-h|--help]";
 | 
			
		||||
        push@{ $rsp{data} }, "\taddkitcomp [-v|--version]";
 | 
			
		||||
        push@{ $rsp{data} }, "\taddkitcomp [-V|--verbose] [-a|--adddeps] [-f|--force] \n\t\t[-n|--noupgrade] -i <osimage> <kitcompname_list>";
 | 
			
		||||
        xCAT::MsgUtils->message( "I", \%rsp, $callback );
 | 
			
		||||
        xCAT::MsgUtils->message( "I", \%rsp, $callback, $ret );
 | 
			
		||||
    };
 | 
			
		||||
 | 
			
		||||
    if ($^O ne 'linux') {
 | 
			
		||||
@@ -1833,6 +1834,13 @@ sub addkitcomp
 | 
			
		||||
        return 1;    # no usage - just exit
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    unless(scalar @ARGV)
 | 
			
		||||
    {
 | 
			
		||||
        $xusage->(1);
 | 
			
		||||
        return 1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
    my %tabs = ();
 | 
			
		||||
    my @tables = qw(kit kitrepo kitcomponent osimage osdistro linuximage);
 | 
			
		||||
    foreach my $t ( @tables ) {
 | 
			
		||||
@@ -2316,12 +2324,13 @@ sub rmkitcomp
 | 
			
		||||
    my $rc;
 | 
			
		||||
 | 
			
		||||
    my $xusage = sub {
 | 
			
		||||
        my $ret = shift;
 | 
			
		||||
        my %rsp;
 | 
			
		||||
        push@{ $rsp{data} }, "Usage: rmkitcomp - Remove Kit components from an xCAT osimage.";
 | 
			
		||||
        push@{ $rsp{data} }, "\trmkitcomp [-h|--help]";
 | 
			
		||||
        push@{ $rsp{data} }, "\trmkitcomp [-v|--version]";
 | 
			
		||||
        push@{ $rsp{data} }, "\trmkitcomp [-V|--verbose] [-u|--uninstall] [-f|--force] \n\t\t-i <osimage> <kitcompname_list>";
 | 
			
		||||
        xCAT::MsgUtils->message( "I", \%rsp, $callback );
 | 
			
		||||
        xCAT::MsgUtils->message( "I", \%rsp, $callback, $ret );
 | 
			
		||||
    };
 | 
			
		||||
 | 
			
		||||
    if ($^O ne 'linux') {
 | 
			
		||||
@@ -2359,6 +2368,13 @@ sub rmkitcomp
 | 
			
		||||
        return 1;    # no usage - just exit
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    unless(scalar @ARGV)
 | 
			
		||||
    {
 | 
			
		||||
        $xusage->(1);
 | 
			
		||||
        return 1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
    my %tabs = ();
 | 
			
		||||
    my @tables = qw(kit kitrepo kitcomponent osimage osdistro linuximage);
 | 
			
		||||
    foreach my $t ( @tables ) {
 | 
			
		||||
 
 | 
			
		||||
		Reference in New Issue
	
	Block a user