GitHub/pbot
3
0
Fork 0
mirror of https://github.com/pragma-/pbot.git synced 2024-10-05 02:48:50 +02:00
Code Issues Projects Releases Wiki Activity

Interpreter: clean up nick-dehighlighter

Browse Source
This commit is contained in:
Pragmatic Software 2020-02-06 10:47:34 -08:00
parent d9aa585949
commit d4bd248f9d
1 changed files with 8 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
PBot/Interpreter.pm
View File

@ -919,17 +919,16 @@ sub handle_result {
sub dehighlight_nicks {
my ($self, $line, $channel) = @_;
$channel = lc $channel;
my $nicklist = $self->{pbot}->{nicklist}->{nicklist};
return $line if not exists $nicklist->{$channel};
my $zwsp = "\x{200b}";
foreach my $nick (keys %{$nicklist->{$channel}}) {
my $n = quotemeta $nicklist->{$channel}->{$nick}->{nick};
return $line if $self->{pbot}->{registry}->get_value('general', 'no_dehighlight_nicks');
my @nicks = $self->{pbot}->{nicklist}->get_nicks($channel);
return $line if not @nicks;
foreach my $nick (@nicks) {
$nick = quotemeta $nick;
my $const_line = $line;
while ($const_line =~ m/($n)/gi) {
while ($const_line =~ m/(?<![^\W_])($nick)(?![^\W_])/gi) {
my $match = $1;
$match =~ s/^(.)/$1$zwsp/;
$line =~ s/$n/$match/i;
$match =~ s/^(.)/$1\x{200b}/;
$line =~ s/$nick/$match/i;
}
}
return $line;