Compare commits
2 Commits
bdcd3b56e5
...
f669186787
| Author | SHA1 | Date | |
|---|---|---|---|
|
|
f669186787 | ||
|
|
1991edc803 |
@@ -16,7 +16,7 @@ use archeologist qw (dig);
|
|||||||
use fisher qw (fish);
|
use fisher qw (fish);
|
||||||
use fortune qw (fortune);
|
use fortune qw (fortune);
|
||||||
use friday qw (friday);
|
use friday qw (friday);
|
||||||
use image qw (kitty fox oboobs obutts);
|
use image qw (kitty fox oboobs obutts rabbit);
|
||||||
use karma qw (karmaSet karmaGet);
|
use karma qw (karmaSet karmaGet);
|
||||||
use lat qw (latAnswer);
|
use lat qw (latAnswer);
|
||||||
use util qw (trim);
|
use util qw (trim);
|
||||||
|
|||||||
@@ -311,6 +311,8 @@ sub rabbit {
|
|||||||
);
|
);
|
||||||
|
|
||||||
my $rabbit = imgur ($terms[irand ($#terms + 1)]);
|
my $rabbit = imgur ($terms[irand ($#terms + 1)]);
|
||||||
|
# return just large thumbnail instead of real photo (that can be really huge)
|
||||||
|
$rabbit = sprintf '%sl%s', substr ($rabbit, 0, -4), substr ($rabbit, -4);
|
||||||
|
|
||||||
if (defined $rabbit) {
|
if (defined $rabbit) {
|
||||||
return sprintf '[(\_/)](%s)', $rabbit;
|
return sprintf '[(\_/)](%s)', $rabbit;
|
||||||
|
|||||||
Reference in New Issue
Block a user