+seen
seenFlushInterval 60
seenMaxDays 90
+ +seenStoreAll
+seenStats
+slashdot
+spell
# [0/1] Factoid search.
set search false
-# [0/1] persistant "seen".
-set seen true
-# [0/1] seen statistics for online users like idle time, total message
-# count.
-set seenStats true
-# [int] if someone's been away for more than xx days, delete their info.
-# info.
-set seenMaxDays 30
-# [int] interval to flush cached seen info. in minutes.
-set seenFlushInterval 60
-# [bool] store all information, irrevelent of addressing.
-# may chew more CPU.
-# Will encourage severe leakaged (2-3x), caused by mysql-perl?
-set seenStoreAll 1
-
# [0/1] keeps stats on individual commands
set stats true
$reply .= " (".&Time2String(time() - $userstats{lc $seen[0]}{'Join'}).")";
}
- if (&IsParam("seenStats")) {
+ if (&IsChanConf("seenStats") > 0) {
my $i;
$i = $userstats{lc $seen[0]}{'Count'};
$reply .= ". Has said a total of \002$i\002 messages" if (defined $i);
}
push(@ignore, keys %{ $ignore{"*"} }) if (exists $ignore{"*"});
- if ((!$skipmessage or &IsChanConf("seenStoreAll")) and
- &IsChanConf("seen") and
+ if ((!$skipmessage or &IsChanConf("seenStoreAll") > 0) and
+ &IsChanConf("seen") > 0 and
$msgType =~ /public/
) {
$seencache{$who}{'time'} = time();
}
$chanstats{$chan}{'Join'}++;
- $userstats{lc $who}{'Join'} = time() if (&IsChanConf("seenStats"));
+ $userstats{lc $who}{'Join'} = time() if (&IsChanConf("seenStats") > 0);
$cache{maxpeeps}{$chan} = $i if ($i > $j);
&joinfloodCheck($who, $chan, $event->userhost);
&clearChanVars($chan);
}
- if (!&IsNickInAnyChan($nick) and &IsChanConf("seenStats")) {
+ if (!&IsNickInAnyChan($nick) and &IsChanConf("seenStats") > 0) {
delete $userstats{lc $nick};
}
$msgtime = time();
$lastWho{$chan} = $nick;
### TODO: use $nick or lc $nick?
- if (&IsChanConf("seenStats")) {
+ if (&IsChanConf("seenStats") > 0) {
$userstats{lc $nick}{'Count'}++;
$userstats{lc $nick}{'Time'} = time();
}
# well.. it's good but weird that this has happened - lets just
# be quiet about it.
}
- delete $userstats{lc $nick} if (&IsChanConf("seenStats"));
+ delete $userstats{lc $nick} if (&IsChanConf("seenStats") > 0);
delete $chanstats{lc $nick};
###