summaryrefslogtreecommitdiffstats
path: root/config-default
diff options
context:
space:
mode:
authorLibravatarDoug Freed <dwfreed@mtu.edu>2016-01-12 17:33:15 -0700
committerLibravatarDoug Freed <dwfreed@mtu.edu>2016-01-12 17:33:15 -0700
commite174e44b0b4545abfc489a2ad321ad18354eef95 (patch)
treedcd61d07b6bcc9916bdf0ab0b406a3cd735b7065 /config-default
parent697d7687bec82a49904e999d14ebed2089d826fc (diff)
Send the investigate URL in a separate message
Works around issues with really long investigate URLs
Diffstat (limited to 'config-default')
-rw-r--r--config-default/commands.xml4
1 files changed, 2 insertions, 2 deletions
diff --git a/config-default/commands.xml b/config-default/commands.xml
index 1aa99ba..9f1f9b5 100644
--- a/config-default/commands.xml
+++ b/config-default/commands.xml
@@ -233,8 +233,8 @@
$dq = join '.', unpack 'C4', pack 'N', $ip;
}
$conn->privmsg($event->replyto, "I found $mnicks matches by nick ($nick), $musers by user ($person->{user}), $mhosts by hostname ($person->{host}), " .
- "$maccts by NickServ account ($person->{account}), $mgecos by gecos field ($person->{gecos}), and $matchedip by real IP ($dq)." .
- ' Web results are at https://antispammeta.net/cgi-bin/secret/investigate.pl?nick=' . uri_escape($nick) .
+ "$maccts by NickServ account ($person->{account}), $mgecos by gecos field ($person->{gecos}), and $matchedip by real IP ($dq).")
+ $conn->privmsg($event->replyto, ' Web results are at https://antispammeta.net/cgi-bin/secret/investigate.pl?nick=' . uri_escape($nick) .
((lc $person->{user} ~~ $::mysql->{ignoredidents}) ? '' : '&user=' . uri_escape($person->{user})) .
'&host=' . uri_escape($person->{host}) . '&account=' . uri_escape($person->{account}) .
((lc $person->{gecos} ~~ $::mysql->{ignoredgecos}) ? '' : '&gecos=' . uri_escape($person->{gecos})) . '&realip=' . $dq);