From b5ec951df12e36efcbc25ee17c74beb0a0281f36 Mon Sep 17 00:00:00 2001
From: Pragmatic Software <pragma78@gmail.com>
Date: Sat, 9 May 2020 03:15:12 -0700
Subject: [PATCH] AntiFlood: check_ban(): correct order of ban_user_timed()
 arguments

---
 PBot/AntiFlood.pm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/PBot/AntiFlood.pm b/PBot/AntiFlood.pm
index 994b811b..23c33519 100644
--- a/PBot/AntiFlood.pm
+++ b/PBot/AntiFlood.pm
@@ -918,11 +918,12 @@ sub check_bans {
                     $self->{pbot}->{chanops}->add_op_command($baninfo->{channel}, "kick $baninfo->{channel} $bannick Evaded $baninfo->{mask} set by $owner");
                 }
                 $self->{pbot}->{banlist}->ban_user_timed(
-                    $banmask, $baninfo->{channel},
+                    $baninfo->{channel},
                     'b',
+                    $banmask,
                     60 * 60 * 24 * 14,
                     $self->{pbot}->{registry}->get_value('irc', 'botnick'),
-                    'ban evasion',
+                    $baninfo->{type} eq 'blacklist' ? 'blacklisted' : 'ban evasion',
                 );
             }
             my $channel_data = $self->{pbot}->{messagehistory}->{database}->get_channel_data($message_account, $channel, 'validated');