variable name corrections
This commit is contained in:
parent
191079c882
commit
adcd3c7a6c
|
@ -16,7 +16,7 @@ use Term::ANSIColor qw(colorstrip);
|
||||||
sub execute {
|
sub execute {
|
||||||
my ( $class, $name ) = @_;
|
my ( $class, $name ) = @_;
|
||||||
|
|
||||||
if (!defined( $jname ) ){
|
if (!defined( $name ) ){
|
||||||
die('No VM name defined');
|
die('No VM name defined');
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -31,7 +31,7 @@ sub execute {
|
||||||
}
|
}
|
||||||
|
|
||||||
# the output is colorized
|
# the output is colorized
|
||||||
$returned=colorstrip($found);
|
$returned=colorstrip($returned);
|
||||||
|
|
||||||
if ( $returned =~ /^No\ such/ ){
|
if ( $returned =~ /^No\ such/ ){
|
||||||
die('"'.$name.'" does not exist');
|
die('"'.$name.'" does not exist');
|
||||||
|
|
Loading…
Reference in New Issue