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

applets/random_quote.pl: update random quote URL

This commit is contained in:
Pragmatic Software 2022-12-25 18:09:23 -08:00
parent 0066c4a312
commit e1eeaa7869
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
applets/random_quote.pl vendored
View File

@ -30,13 +30,12 @@ my @quotes;
while (1) {
if ($#ARGV < 0) {
my %post = ('number' => '4', 'collection[]' => 'mgm', 'collection[]' => 'motivate');
$response = $ua->post("http://www.quotationspage.com/random.php3", \%post);
$response = $ua->post("http://www.quotationspage.com/random.php", \%post);
} else {
my $arguments = join('+', @ARGV);
my $author = "";
$arguments =~ s/\$nick/me/gi;
$arguments = uri_escape($arguments);
if ($arguments =~ m/\-\-author[\s\+]+(.*)/i) {
$author = $1;