diff options
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); |