"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "lib/Image/ExifTool/Olympus.pm" between
Image-ExifTool-12.05.tar.gz and Image-ExifTool-12.06.tar.gz

About: ExifTool is a platform-independent Perl library plus a command-line application for reading, writing and editing meta information in a wide variety of files.

Olympus.pm  (Image-ExifTool-12.05):Olympus.pm  (Image-ExifTool-12.06)
skipping to change at line 43 skipping to change at line 43
#------------------------------------------------------------------------------ #------------------------------------------------------------------------------
package Image::ExifTool::Olympus; package Image::ExifTool::Olympus;
use strict; use strict;
use vars qw($VERSION); use vars qw($VERSION);
use Image::ExifTool qw(:DataAccess :Utils); use Image::ExifTool qw(:DataAccess :Utils);
use Image::ExifTool::Exif; use Image::ExifTool::Exif;
use Image::ExifTool::APP12; use Image::ExifTool::APP12;
$VERSION = '2.67'; $VERSION = '2.68';
sub PrintLensInfo($$$); sub PrintLensInfo($$$);
my %offOn = ( 0 => 'Off', 1 => 'On' ); my %offOn = ( 0 => 'Off', 1 => 'On' );
# lookup for Olympus LensType values # lookup for Olympus LensType values
# (as of ExifTool 9.15, this was the complete list of chipped lenses at www.four -thirds.org) # (as of ExifTool 9.15, this was the complete list of chipped lenses at www.four -thirds.org)
my %olympusLensTypes = ( my %olympusLensTypes = (
Notes => q{ Notes => q{
The numerical values below are given in hexadecimal. (Prior to ExifTool The numerical values below are given in hexadecimal. (Prior to ExifTool
skipping to change at line 1901 skipping to change at line 1901
join ' ', map {$_ / 100} @nums; join ' ', map {$_ / 100} @nums;
}, },
}, },
0x306 => { #11 0x306 => { #11
Name => 'AFFineTune', Name => 'AFFineTune',
Writable => 'int8u', Writable => 'int8u',
PrintConv => { 0 => 'Off', 1 => 'On' }, PrintConv => { 0 => 'Off', 1 => 'On' },
}, },
0x307 => { #15 0x307 => { #15
Name => 'AFFineTuneAdj', Name => 'AFFineTuneAdj',
Format => 'int16s', Writable => 'int16s',
Count => 3, # not sure what the 3 values mean Count => 3, # not sure what the 3 values mean
}, },
0x308 => { #forum11578
Name => 'FocusBracketStepSize',
Writable => 'int8u',
},
0x400 => { #6 0x400 => { #6
Name => 'FlashMode', Name => 'FlashMode',
Writable => 'int16u', Writable => 'int16u',
PrintConv => { PrintConv => {
0 => 'Off', 0 => 'Off',
BITMASK => { BITMASK => {
0 => 'On', 0 => 'On',
1 => 'Fill-in', 1 => 'Fill-in',
2 => 'Red-eye', 2 => 'Red-eye',
3 => 'Slow-sync', 3 => 'Slow-sync',
skipping to change at line 2909 skipping to change at line 2913
Name => 'ShadingCompensation2', Name => 'ShadingCompensation2',
Writable => 'int16u', Writable => 'int16u',
PrintConv => \%offOn, PrintConv => \%offOn,
}, },
0x101c => { #11 0x101c => { #11
Name => 'MultipleExposureMode', Name => 'MultipleExposureMode',
Writable => 'int16u', Writable => 'int16u',
Count => 2, Count => 2,
PrintConv => [{ PrintConv => [{
0 => 'Off', 0 => 'Off',
1 => 'Live Composite', #github issue#61
2 => 'On (2 frames)', 2 => 'On (2 frames)',
3 => 'On (3 frames)', 3 => 'On (3 frames)',
}], }],
}, },
0x1103 => { #PH 0x1103 => { #PH
Name => 'UnknownBlock3', Name => 'UnknownBlock3',
Writable => 'undef', Writable => 'undef',
Notes => 'large unknown data block in ORF images but not JPG images', Notes => 'large unknown data block in ORF images but not JPG images',
# 'Drop' because too large for APP1 in JPEG images # 'Drop' because too large for APP1 in JPEG images
Flags => [ 'Unknown', 'Binary', 'Drop' ], Flags => [ 'Unknown', 'Binary', 'Drop' ],
 End of changes. 4 change blocks. 
2 lines changed or deleted 7 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)