From: Andrew DeFaria Date: Tue, 23 Jan 2018 22:06:41 +0000 (-0800) Subject: Fixed bug in detail.cgi X-Git-Url: https://defaria.com/gitweb/?a=commitdiff_plain;h=b220abf42ba34ada17f6fa24c8d23c87139340f7;p=clearscm.git Fixed bug in detail.cgi --- diff --git a/maps/bin/detail.cgi b/maps/bin/detail.cgi index b4c3e90..2da6965 100755 --- a/maps/bin/detail.cgi +++ b/maps/bin/detail.cgi @@ -174,17 +174,17 @@ sub PrintTable { foreach my $sender (ReturnSenders $userid, $type, $next, $lines, $date) { my @msgs = ReturnMessages $userid, $sender; my @msgs2 = @msgs; - my $onlist; + my ($onlist, $seq); my $rule = 'none'; my $hit_count = 0; - ($onlist, $rule, $hit_count) = OnWhitelist $sender, $userid, 0; + ($onlist, $rule, $seq, $hit_count) = OnWhitelist $sender, $userid, 0; unless ($onlist) { - ($onlist, $rule, $hit_count) = OnBlacklist $sender, 0; + ($onlist, $rule, $seq, $hit_count) = OnBlacklist $sender, 0; unless ($onlist) { - ($onlist, $rule, $hit_count) = OnNulllist $sender, 0; + ($onlist, $rule, $seq, $hit_count) = OnNulllist $sender, 0; } # unless } # unless