summaryrefslogtreecommitdiffstats
path: root/ksirc/default.pl
diff options
context:
space:
mode:
authorSlávek Banko <[email protected]>2013-02-19 04:53:14 +0100
committerSlávek Banko <[email protected]>2013-02-19 04:53:14 +0100
commitaf0ecb300f874957389bd6966cb99750261b1a06 (patch)
tree1b580220b7884c2e54a388fe6334e9e0e5c40677 /ksirc/default.pl
parent37c3894d7e792a87e09319c50508424a5cb46e89 (diff)
downloadtdenetwork-af0ecb300f874957389bd6966cb99750261b1a06.tar.gz
tdenetwork-af0ecb300f874957389bd6966cb99750261b1a06.zip
Fix unintended rename of many various *klist*
Diffstat (limited to 'ksirc/default.pl')
-rw-r--r--ksirc/default.pl6
1 files changed, 3 insertions, 3 deletions
diff --git a/ksirc/default.pl b/ksirc/default.pl
index e253f1e9..7b42dd18 100644
--- a/ksirc/default.pl
+++ b/ksirc/default.pl
@@ -428,12 +428,12 @@ sub cmd_fk {
$n0thing_kickpat=$newarg;
&slashify($n0thing_kickpat);
$n0thing_kickmsg=$args || "though names may change each face retains the mask it wore";
- &addhook("352", "doftdelist");
+ &addhook("352", "dofklist");
&addhook("315", "donefk");
&sl("WHO $talkchannel");
}
&addcmd("fk");
-sub hook_doftdelist {
+sub hook_dofklist {
local($a)=@_;
local($c, $c, $u, $h, $s, $n)=split(/ +/, $a);
(($n."!".$u."\@".$h) =~ /${n0thing_kickpat}/i) && $n ne $nick &&
@@ -441,7 +441,7 @@ sub hook_doftdelist {
$silent=1;
}
sub hook_donefk {
- &remhook("352", "doftdelist");
+ &remhook("352", "dofklist");
&remhook("315", "donefk");
}
sub cmd_setaway {