Fix regexp
This commit is contained in:
parent
2b07935655
commit
abd898f025
@ -153,6 +153,9 @@ sub on_public {
|
||||
# FIXME: the logging gets spammy ... do we actually want to log to stdout?
|
||||
print "<$nick> $arg\n";
|
||||
|
||||
$mynick =~ s/\[/\\[/g;
|
||||
$mynick =~ s/\]/\\]/g;
|
||||
|
||||
if ($arg =~ /^$mynick[,: ]/i || $arg =~ /^!/ ) {
|
||||
if ($arg =~ /^(?:$mynick[,: ]|!)\s*ignore (.+)\s*$/i) {
|
||||
$ignore{$1} = 1;
|
||||
@ -235,7 +238,7 @@ sub on_public {
|
||||
{
|
||||
$self->privmsg([ @to ], "$nick: d'accord je la ferme :-(");
|
||||
$::tagueule = 1;
|
||||
$self->nick('vivivi{zzz}');
|
||||
$self->nick('vivivi[zzz]');
|
||||
}
|
||||
else {
|
||||
$self->privmsg([ @to ], "$nick: je reviens et je ne suis pas content !");
|
||||
@ -507,6 +510,6 @@ sub adjust_nick
|
||||
$count += $_;
|
||||
}
|
||||
close CMDPIPE;
|
||||
$conn->nick(sprintf('vivivi{%s}', $count)) if ( $count > 0 );
|
||||
$conn->nick(sprintf('vivivi[%s]', $count)) if ( $count > 0 );
|
||||
}
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user