X-Git-Url: https://git.sesse.net/?a=blobdiff_plain;f=perl%2FSesse%2Fpr0n%2FCommon.pm;h=d2002c13a66de78547c00f1639989bdb9c3dc1a8;hb=9591c060e1247afa084abd5f8cbd70023357b220;hp=93e6c699b8f3231ab132ae10e6cc326a1efecad2;hpb=1af10685072b55487ad3066851edc9cd992f8f5a;p=pr0n

diff --git a/perl/Sesse/pr0n/Common.pm b/perl/Sesse/pr0n/Common.pm
index 93e6c69..d2002c1 100644
--- a/perl/Sesse/pr0n/Common.pm
+++ b/perl/Sesse/pr0n/Common.pm
@@ -35,7 +35,7 @@ BEGIN {
 		require Sesse::pr0n::Config_local;
 	};
 
-	$VERSION     = "v2.51";
+	$VERSION     = "v2.52";
 	@ISA         = qw(Exporter);
 	@EXPORT      = qw(&error &dberror);
 	%EXPORT_TAGS = qw();
@@ -392,7 +392,7 @@ sub ensure_cached {
 		# ImageMagick can handle NEF files, but it does it by calling dcraw as a delegate.
 		# The delegate support is rather broken and causes very odd stuff to happen when
 		# more than one thread does this at the same time. Thus, we simply do it ourselves.
-		if ($filename =~ /\.nef$/) {
+		if ($filename =~ /\.nef$/i) {
 			# this would suffice if ImageMagick gets to fix their handling
 			# $fname = "NEF:$fname";
 			
@@ -561,6 +561,8 @@ sub make_infobox {
 		push @classic_fields, [ $info->{'NikonD1-ISOSetting'}->[1] . " ISO", 0 ];
 	} elsif (defined($info->{'ISOSetting'})) {
 		push @classic_fields, [ $info->{'ISOSetting'} . " ISO" ];
+	} elsif (defined($info->{'ISO'})) {
+		push @classic_fields, [ $info->{'ISO'} . " ISO" ];
 	}
 
 	if (defined($info->{'ExposureBiasValue'}) && $info->{'ExposureBiasValue'} ne "0") {