From fc595e9ee4f580bde310082fa37d2cbf9e54b00d Mon Sep 17 00:00:00 2001 From: Mercier Pierre-Olivier Date: Mon, 11 Nov 2013 16:57:44 +0100 Subject: [PATCH] Fix warning --- ACU/Trace.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/ACU/Trace.pm b/ACU/Trace.pm index 33dd018..430f9f2 100644 --- a/ACU/Trace.pm +++ b/ACU/Trace.pm @@ -354,7 +354,8 @@ sub getIds my $login = shift; my %ids; - if (!$login || $self->{who}{type} eq "group" || $self->{who}{login} eq $login) + log TRACE, $self->{who}; + if (!$login || !exists $self->{who} || $self->{who}{type} eq "group" || $self->{who}{login} eq $login) { while (my ($key, $value) = each %{ $self->{who}{values} }) {