Fix 'Add host or cluster' to contain cluster names

This commit is contained in:
Duncan Ferguson 2014-05-15 18:24:15 +01:00
parent 74151fe5e0
commit 155b861e08
2 changed files with 5 additions and 1 deletions

View file

@ -173,7 +173,10 @@ sub get_tag {
sub list_tags {
my ($self) = @_;
return sort keys( %{ $self->{tags} } );
return
wantarray
? sort keys( %{ $self->{tags} } )
: scalar keys( %{ $self->{tags} } );
}
sub dump_tags {