Skip to content

Commit e73e50e

Browse files
weechatterflashcode
authored andcommitted
query_blocker.pl 1.6: fix parsing of nick when message has tags
1 parent ae799ac commit e73e50e

File tree

1 file changed

+8
-2
lines changed

1 file changed

+8
-2
lines changed

perl/query_blocker.pl

Lines changed: 8 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -38,6 +38,10 @@
3838
#
3939
# -----------------------------------------------------------------------------
4040
# History:
41+
# 2023-06-29: nils_2@libera.#weechat
42+
# version 1.6:
43+
# FIX: nick was not correctly parsed when message has tags.
44+
#
4145
# 2022-02-21: CrazyCat <[email protected]>
4246
# version 1.5:
4347
# FIX: regression from https://github.com/weechat/scripts/issues/493
@@ -125,7 +129,7 @@
125129

126130
my $SCRIPT = 'query_blocker';
127131
my $AUTHOR = 'rettub <[email protected]>';
128-
my $VERSION = '1.5';
132+
my $VERSION = '1.6';
129133
my $LICENSE = 'GPL3';
130134
my $DESCRIPTION = 'Simple blocker for private message (i.e. spam)';
131135
my $COMMAND = "query_blocker"; # new command name
@@ -406,9 +410,11 @@ sub modifier_irc_in_privmsg {
406410
# by default, blocking is enabled for all server. except the one with a localvar
407411
return $arg if (weechat::buffer_get_string(weechat::buffer_search("irc", "server.".$server), 'localvar_query_blocker'));
408412

413+
409414
# check for query message
410415
if ( $arg =~ m/:(.+?)!.+? PRIVMSG (.+?) :(.*)/i ) {
411-
my $query_nick = $1;
416+
my $hashtable = weechat::info_get_hashtable("irc_message_parse" => + { "message" => $arg });
417+
my $query_nick = $hashtable->{nick};
412418
my $my_nick_msg = $2;
413419
my $query_msg = $3;
414420

0 commit comments

Comments
 (0)