"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "lib/Image/ExifTool/Photoshop.pm" between
Image-ExifTool-12.26.tar.gz and Image-ExifTool-12.27.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.

Photoshop.pm  (Image-ExifTool-12.26):Photoshop.pm  (Image-ExifTool-12.27)
skipping to change at line 990 skipping to change at line 990
DataPt => $dataPt, DataPt => $dataPt,
DataPos => $$dirInfo{DataPos}, DataPos => $$dirInfo{DataPos},
Size => $size, Size => $size,
Start => $pos, Start => $pos,
Base => $$dirInfo{Base}, Base => $$dirInfo{Base},
Parent => $$dirInfo{DirName}, Parent => $$dirInfo{DirName},
); );
$size += 1 if $size & 0x01; # size is padded to an even # bytes $size += 1 if $size & 0x01; # size is padded to an even # bytes
$pos += $size; $pos += $size;
} }
# warn about incorrect IPTCDigest
if ($$et{VALUE}{IPTCDigest} and $$et{VALUE}{CurrentIPTCDigest} and
$$et{VALUE}{IPTCDigest} ne $$et{VALUE}{CurrentIPTCDigest})
{
$et->WarnOnce('IPTCDigest is not current. XMP may be out of sync');
}
delete $$et{LOW_PRIORITY_DIR}{'*'}; delete $$et{LOW_PRIORITY_DIR}{'*'};
return $success; return $success;
} }
#------------------------------------------------------------------------------ #------------------------------------------------------------------------------
# extract information from Photoshop PSD file # extract information from Photoshop PSD file
# Inputs: 0) ExifTool object reference, 1) dirInfo reference # Inputs: 0) ExifTool object reference, 1) dirInfo reference
# Returns: 1 if this was a valid PSD file, -1 on write error # Returns: 1 if this was a valid PSD file, -1 on write error
sub ProcessPSD($$) sub ProcessPSD($$)
{ {
 End of changes. 1 change blocks. 
0 lines changed or deleted 6 lines changed or added

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