git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@732
c11ca15a-4712-0410-83d8-
924469b57eb5
my @list;
my $delta_time = &timedelta($start_time);
my @list;
my $delta_time = &timedelta($start_time);
- &status(sprintf("factstats(vandalismbroken): %.02f sec to retreive all factoids.", $delta_time)) if ($delta_time > 0);
+ &status(sprintf("factstats(vandalism): %.02f sec to retreive all factoids.", $delta_time)) if ($delta_time > 0);
$start_time = &timeget();
# parse the factoids.
$start_time = &timeget();
# parse the factoids.
"factoid_value", "^<REPLY> see ");
my %redir;
my $f;
"factoid_value", "^<REPLY> see ");
my %redir;
my $f;
for (@list) {
my $factoid = $_;
for (@list) {
my $factoid = $_;
if (defined $redirval) {
$redir{$redir}{$factoid} = 1;
} else {
if (defined $redirval) {
$redir{$redir}{$factoid} = 1;
} else {
- &WARN("factstats(redir): '$factoid' has loose link => '$redir'.");
+ &DEBUG("factstats(redir): '$factoid' has loose link => '$redir'.");
+ $dangling++;
- my $prefix = "Redirections in factoids ";
+ my $prefix = "Redirections in factoids, $dangling dangling ";
return &formListReply(1, $prefix, @newlist);
} elsif ($type =~ /^request(ed)?$/i) {
return &formListReply(1, $prefix, @newlist);
} elsif ($type =~ /^request(ed)?$/i) {