diff options
Diffstat (limited to 'lib/Image/ExifTool/FLIR.pm')
| -rw-r--r-- | lib/Image/ExifTool/FLIR.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Image/ExifTool/FLIR.pm b/lib/Image/ExifTool/FLIR.pm index efdaf1c4..4d020be0 100644 --- a/lib/Image/ExifTool/FLIR.pm +++ b/lib/Image/ExifTool/FLIR.pm @@ -24,7 +24,7 @@ use Image::ExifTool qw(:DataAccess :Utils); use Image::ExifTool::Exif; use Image::ExifTool::GPS; -$VERSION = '1.22'; +$VERSION = '1.23'; sub ProcessFLIR($$;$); sub ProcessFLIRText($$$); @@ -1468,7 +1468,7 @@ sub ProcessMeasInfo($$$) sub ProcessFLIR($$;$) { my ($et, $dirInfo, $tagTablePtr) = @_; - my $raf = $$dirInfo{RAF} || new File::RandomAccess($$dirInfo{DataPt}); + my $raf = $$dirInfo{RAF} || File::RandomAccess->new($$dirInfo{DataPt}); my $verbose = $et->Options('Verbose'); my $out = $et->Options('TextOut'); my $base = $raf->Tell(); |