GitHub/pbot
3
0
Fork 0
mirror of https://github.com/pragma-/pbot.git synced 2024-12-24 03:33:06 +01:00
Code Issues Projects Releases Wiki Activity

Fix and clean up factadd -url (todo: forking)

Browse Source
This commit is contained in:
Pragmatic Software 2019-06-30 17:54:08 -07:00
parent 3fb72f73c5
commit dea44fb405
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
PBot/FactoidCommands.pm
View File

@ -964,7 +964,11 @@ sub factadd {
$self->{pbot}->{interpreter}->shift_arg(\@arglist);
# the URL is the remaining arguments
($url) = $self->{pbot}->{interpreter}->split_args(\@arglist, 1);
my ($url) = $self->{pbot}->{interpreter}->split_args(\@arglist, 1);
if ($url !~ m/^https?:\/\/(?:sprunge.us|ix.io)\/\w+$/) {
return "Invalid URL: acceptable URLs are: https://sprunge.us, https://ix.io";
}
# create a UserAgent
my $ua = LWP::UserAgent->new(timeout => 10);
@ -990,7 +994,7 @@ sub factadd {
}
if (not defined $from_chan or not defined $text or not defined $keyword) {
return "Usage: factadd [-f] [channel] <keyword> <factoid>; -f to force overwrite";
return "Usage: factadd [-f] [channel] <keyword> (<factoid> | -url <paste site>); -f to force overwrite; -url to download from paste site";
}
$from_chan = '.*' if $from_chan !~ /^#/;