diff options
Diffstat (limited to 'lib/Image/ExifTool/Rawzor.pm')
-rw-r--r-- | lib/Image/ExifTool/Rawzor.pm | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lib/Image/ExifTool/Rawzor.pm b/lib/Image/ExifTool/Rawzor.pm index b9b17687..bdee691c 100644 --- a/lib/Image/ExifTool/Rawzor.pm +++ b/lib/Image/ExifTool/Rawzor.pm @@ -14,7 +14,7 @@ use strict; use vars qw($VERSION); use Image::ExifTool qw(:DataAccess :Utils); -$VERSION = '1.03'; +$VERSION = '1.04'; # currently support this version Rawzor images my $implementedRawzorVersion = 199; # (up to version 1.99) @@ -140,8 +140,7 @@ sub ProcessRWZ($$) my $origFileType = $$et{VALUE}{FileType}; if ($origFileType) { $et->HandleTag($tagTablePtr, OriginalFileType => $origFileType); - $$et{VALUE}{FileType} = 'RWZ'; - $$et{VALUE}{MIMEType} = 'image/x-rawzor'; + $et->OverrideFileType('RWZ'); } else { $et->HandleTag($tagTablePtr, OriginalFileType => 'Unknown'); $et->SetFileType(); |