Don't use $Groups if it is undefined.
Signed-off-by: Francois Gouget fgouget@codeweavers.com ---
This fixes WineSendLog and thus the patch status and Marvin emails.
testbot/lib/WineTestBot/LogUtils.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/testbot/lib/WineTestBot/LogUtils.pm b/testbot/lib/WineTestBot/LogUtils.pm index 51932965c..32bf0fa61 100644 --- a/testbot/lib/WineTestBot/LogUtils.pm +++ b/testbot/lib/WineTestBot/LogUtils.pm @@ -889,7 +889,7 @@ sub GetNewLogErrors($$$) my ($RefFileName, $Groups, $Errors) = @_;
my (@NewGroups, %NewErrors, %NewIndices); - return (@NewGroups, %NewErrors, %NewIndices) if (!@$Groups); + return (@NewGroups, %NewErrors, %NewIndices) if (!$Groups or !@$Groups);
my ($RefGroups, $RefErrors) = GetLogErrors($RefFileName); return (undef, undef) if (!$RefGroups);