diff options
author | exiftool <phil@work3.phy.queensu.ca> | 2015-11-06 09:08:38 -0500 |
---|---|---|
committer | exiftool <phil@work3.phy.queensu.ca> | 2015-11-06 09:08:38 -0500 |
commit | e294b14e2e21211ce59696c13f9e93d3827b4faf (patch) | |
tree | 779b6a26b03eeba158be28719126b17451e99d3a /lib/Image/ExifTool/WritePostScript.pl | |
parent | 3277f4555db830b7e1aad4de24fb8d863d671d27 (diff) |
Update to 10.05
Diffstat (limited to 'lib/Image/ExifTool/WritePostScript.pl')
-rw-r--r-- | lib/Image/ExifTool/WritePostScript.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Image/ExifTool/WritePostScript.pl b/lib/Image/ExifTool/WritePostScript.pl index 622dc082..462d9d4f 100644 --- a/lib/Image/ExifTool/WritePostScript.pl +++ b/lib/Image/ExifTool/WritePostScript.pl @@ -290,7 +290,7 @@ sub WriteNewTags($$$) my $tagInfo = $$newTags{$tag}; my $nvHash = $et->GetNewValueHash($tagInfo); next unless $$nvHash{IsCreating}; - my $val = $et->GetNewValues($nvHash); + my $val = $et->GetNewValue($nvHash); $et->VerboseValue("+ PostScript:$$tagInfo{Name}", $val); Write($outfile, EncodeTag($tag, $val)) or $success = 0; ++$$et{CHANGED}; @@ -583,7 +583,7 @@ sub WritePS($$) my $nvHash = $et->GetNewValueHash($tagInfo); if ($et->IsOverwriting($nvHash, $val)) { $et->VerboseValue("- PostScript:$$tagInfo{Name}", $val); - $val = $et->GetNewValues($nvHash); + $val = $et->GetNewValue($nvHash); ++$$et{CHANGED}; next unless defined $val; # next if tag is being deleted $et->VerboseValue("+ PostScript:$$tagInfo{Name}", $val); |