aleesa-bot/aleesa-telegram
0
Fork 0
Code Pull Requests Projects Releases Activity

Perlcritic and similar fixes, no functional changes

Browse Source
This commit is contained in:
eleksir
2021-03-27 10:35:04 +03:00
parent 36208a35d5
commit c6ce5b1421
4 changed files with 9 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lib/monkeyuser.pm
View File

@@ -37,11 +37,11 @@ sub monkeyuser {
do {
$#a = -1;
@a = $p->get_tag("a");
@a = $p->get_tag('a'); ## no critic (Variables::RequireLocalizedPunctuationVars)
if (defined $a[0][1]->{class} && $a[0][1]->{class} eq 'lazyload small-image') {
if (defined $a[0][1]->{"data-src"} && ($a[0][1]->{"data-src"} !~ /adlitteram/)) {
push @link, $a[0][1]->{"data-src"};
if (defined $a[0][1]->{'data-src'} && ($a[0][1]->{'data-src'} !~ /adlitteram/)) {
push @link, $a[0][1]->{'data-src'};
}
}