mirror of
https://github.com/pragma-/pbot.git
synced 2024-11-23 12:29:27 +01:00
factalias
channel argument now optional
This commit is contained in:
parent
f78c40cf91
commit
dfacf2c807
@ -697,13 +697,24 @@ sub factalias {
|
|||||||
my $self = shift;
|
my $self = shift;
|
||||||
my ($from, $nick, $user, $host, $arguments) = @_;
|
my ($from, $nick, $user, $host, $arguments) = @_;
|
||||||
$arguments = validate_string($arguments);
|
$arguments = validate_string($arguments);
|
||||||
|
|
||||||
my ($chan, $alias, $command) = split /\s+/, $arguments, 3 if defined $arguments;
|
my ($chan, $alias, $command) = split /\s+/, $arguments, 3 if defined $arguments;
|
||||||
|
|
||||||
if(not defined $command) {
|
if (defined $chan and not ($chan eq '.*' or $chan =~ m/^#/)) {
|
||||||
return "Usage: factalias <channel> <keyword> <command>";
|
# $chan doesn't look like a channel, so shift everything right
|
||||||
|
# and replace $chan with $from
|
||||||
|
if (defined $command and length $command) {
|
||||||
|
$command = "$alias $command";
|
||||||
|
} else {
|
||||||
|
$command = $alias;
|
||||||
|
}
|
||||||
|
$alias = $chan;
|
||||||
|
$chan = $from;
|
||||||
}
|
}
|
||||||
|
|
||||||
$chan = '.*' if $chan !~ /^#/;
|
if (not length $alias or not length $command) {
|
||||||
|
return "Usage: factalias [channel] <keyword> <command>";
|
||||||
|
}
|
||||||
|
|
||||||
if (length $alias > 30) {
|
if (length $alias > 30) {
|
||||||
return "/say $nick: I don't think the factoid name needs to be that long.";
|
return "/say $nick: I don't think the factoid name needs to be that long.";
|
||||||
|
Loading…
Reference in New Issue
Block a user