git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@809
c11ca15a-4712-0410-83d8-
924469b57eb5
for (@list) {
my $factoid = $_;
my $val = &getFactInfo($factoid, "factoid_value");
for (@list) {
my $factoid = $_;
my $val = &getFactInfo($factoid, "factoid_value");
next unless ($val =~ /^see( also)? (.*?)\.?$/i);
my $redirf = lc $2;
next unless ($val =~ /^see( also)? (.*?)\.?$/i);
my $redirf = lc $2;
} elsif ($type =~ /^unrequest(ed)?$/i) {
# todo: use sqlSelect()
} elsif ($type =~ /^unrequest(ed)?$/i) {
# todo: use sqlSelect()
- my @list = &sqlRawReturn("SELECT factoid_key FROM factoids WHERE requested_count IS NULL");
-
- for (@list) {
- s/([\,\;]+)/\037$1\037/g;
- }
+ my $count = &sqlRawReturn("SELECT COUNT(*) FROM factoids WHERE requested_count = '0'");
- my $prefix = "Unrequested factoids ";
- return &formListReply(0, $prefix, @list);
+ return "Unrequested factoids: $count";
}
return "error: invalid type => '$type'.";
}
return "error: invalid type => '$type'.";