3
0
mirror of https://github.com/pragma-/pbot.git synced 2024-11-25 21:39:27 +01:00

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

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;