| Subject: | Sys::Virt::list_recrets causing deep recursion |
In the code below list_secrets call itself. Also, There is no exit
condition before calling itself.
i think instead of
my @uuids = $self->list_secrets($nuuids);
it should have been
my @uuids = $self->list_secret_uuids($nuuids);
Definition of list_secrets in Sys::Virt
sub list_secrets {
my $self = shift;
my $nuuids = $self->num_of_secrets();
my @uuids = $self->list_secrets($nuuids);
my @secrets;
foreach my $uuid (@uuids) {
eval {
push @secrets, Sys::Virt::Secret->_new(connection => $self,
uuid => $uuid);
};
if ($@) {
# nada - secret went away before we could look it up
};
}
return @secrets;
}