X-Git-Url: https://git.sesse.net/?p=pr0n;a=blobdiff_plain;f=perl%2FSesse%2Fpr0n%2FCommon.pm;h=8fe17d738f7b9300dda864abe45e6de6bd17a0ea;hp=d5e672746a3b8708777cf51e469fa3c037ee31e4;hb=86ad645e65c1a448941453f9dcbf3df599db1e21;hpb=0ca17c2b65860aca298efaf74bb524645d9506c1 diff --git a/perl/Sesse/pr0n/Common.pm b/perl/Sesse/pr0n/Common.pm index d5e6727..8fe17d7 100644 --- a/perl/Sesse/pr0n/Common.pm +++ b/perl/Sesse/pr0n/Common.pm @@ -439,9 +439,11 @@ sub make_infobox { if (defined($info->{'Flash'})) { if ($info->{'Flash'} =~ /did not fire/i || $info->{'Flash'} =~ /no flash/i || - $info->{'Flash'} =~ /not fired/i) { + $info->{'Flash'} =~ /not fired/i || + $info->{'Flash'} =~ /Off/) { push @lines, "No flash"; - } elsif ($info->{'Flash'} =~ /fired/i) { + } elsif ($info->{'Flash'} =~ /fired/i || + $info->{'Flash'} =~ /On/) { push @lines, "Flash"; } else { push @lines, $info->{'Flash'};