GitHub
/
pbot
mirror of https://github.com/pragma-/pbot.git
3
0
Fork 0
Code Issues Projects Releases Wiki Activity

factoids: be more clear about how to choose factoids from another channel if ambiguous keyword; find_factoid searches channel namespace better

This commit is contained in:
Pragmatic Software 2011-01-30 03:03:31 +00:00
parent 221a698ecb
commit ffdecba6ee
2 changed files with 5 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
PBot/Factoids.pm
View File

@ -167,7 +167,7 @@ sub find_factoid {
if($exact_channel) {
next unless $from eq $channel;
} else {
next unless $from =~ m/$channel/i;
next unless $from =~ m/^$channel$/i;
}
foreach my $trigger (keys %{ $self->factoids->hash->{$channel} }) {
@ -209,7 +209,6 @@ sub interpreter {
($channel, $keyword) = $self->find_factoid($from, $keyword, $arguments);
if(not defined $keyword) {
# first check all channels for this keyword
my $chans = "";
my $comma = "";
my $found = 0;
@ -229,7 +228,7 @@ sub interpreter {
}
if($found > 1) {
return $ref_from . "Ambiguous keyword '$original_keyword' exists in multiple locations (choose one): $chans";
return $ref_from . "Ambiguous keyword '$original_keyword' exists in multiple locations (use 'fact <keyword> <location>' to choose one): $chans";
}
elsif($found == 1) {
$pbot->logger->log("Found '$original_keyword' as '$fwd_trig' in [$fwd_chan]\n");
@ -266,7 +265,7 @@ sub interpreter {
$self->factoids->hash->{$channel}->{$keyword}->{ref_user} = $nick;
$self->factoids->hash->{$channel}->{$keyword}->{last_referenced_on} = gettimeofday;
return $ref_from . $pbot->interpreter->interpret($from, $nick, $user, $host, $count, $command, $ref_from);
return $ref_from . $pbot->interpreter->interpret($from, $nick, $user, $host, $count, $command);
}
my $last_ref_in = 0;
@ -413,7 +412,7 @@ sub interpreter {
$cmd = $self->factoids->hash->{$channel}->{$keyword}->{action};
}
$result = $pbot->interpreter->interpret($from, $nick, $user, $host, $count, $cmd, $ref_from);
$result = $pbot->interpreter->interpret($from, $nick, $user, $host, $count, $cmd);
return $ref_from . $result;
};

2
PBot/VERSION.pm
View File

@ -13,7 +13,7 @@ use warnings;
# These are set automatically by the build/commit script
use constant {
BUILD_NAME => "PBot",
BUILD_REVISION => 281,
BUILD_REVISION => 282,
BUILD_DATE => "2011-01-29",
};