3
0
mirror of https://github.com/pragma-/pbot.git synced 2024-12-23 11:12:42 +01:00

Add add_nick metadata key to tell modules to prepend nick to resulting text; unquote all spaces in module arguments

This commit is contained in:
Pragmatic Software 2014-02-24 00:58:00 +00:00
parent 7388bf9cfc
commit 6e3dc6dba2
2 changed files with 12 additions and 6 deletions

View File

@ -62,7 +62,7 @@ sub execute_module {
$arguments =~ s/\$nick/$nick/g;
$arguments = quotemeta($arguments);
$arguments =~ s/\\\s/ /;
$arguments =~ s/\\\s/ /g;
if(exists $self->{pbot}->factoids->factoids->hash->{$channel}->{$trigger}->{modulelauncher_subpattern}) {
if($self->{pbot}->factoids->factoids->hash->{$channel}->{$trigger}->{modulelauncher_subpattern} =~ m/s\/(.*?)\/(.*)\//) {
@ -80,6 +80,7 @@ sub execute_module {
$arguments =~ s/\$9/$i/g;
$arguments =~ s/\$`/$before/g;
$arguments =~ s/\$'/$after/g;
$self->{pbot}->logger->log("arguments subpattern: $arguments\n");
} else {
$self->{pbot}->logger->log("Invalid module substitution pattern [" . $self->{pbot}->factoids->factoids->hash->{$channel}->{$trigger}->{modulelauncher_subpattern}. "], ignoring.\n");
}
@ -129,11 +130,12 @@ sub execute_module {
Carp::croak("Could not chdir to '$module_dir': $!");
}
# print "module arguments: [$arguments]\n";
# $self->{pbot}->logger->log("module arguments: [$arguments]\n");
$text = `$module_dir/$module $arguments`;
if(defined $tonick) {
$self->{pbot}->logger->log("($from): $nick!$user\@$host) sent to $tonick\n");
$text = `$module_dir/$module $arguments`;
if(defined $text && length $text > 0) {
# get rid of original caller's nick
$text =~ s/^\/([^ ]+) \Q$nick\E:\s+/\/$1 /;
@ -144,7 +146,11 @@ sub execute_module {
return "";
}
} else {
return `$module_dir/$module $arguments`;
if(exists $self->{pbot}->factoids->factoids->hash->{$channel}->{$trigger}->{add_nick} and $self->{pbot}->factoids->factoids->hash->{$channel}->{$trigger}->{add_nick} != 0) {
return "$nick: $text";
} else {
return $text;
}
}
return "/me moans loudly."; # er, didn't execute the module?

View File

@ -13,8 +13,8 @@ use warnings;
# These are set automatically by the build/commit script
use constant {
BUILD_NAME => "PBot",
BUILD_REVISION => 483,
BUILD_DATE => "2014-02-22",
BUILD_REVISION => 484,
BUILD_DATE => "2014-02-23",
};
1;