From 29ea037677bb5b9a2d0e4f50f275feca605bc516 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Wed, 14 Jun 2017 01:00:10 +0530
Subject: Handle literal "-" tag values.

* exiftool.el (exiftool-read): If exiftool returns "-" as tag value
with the "-f" flag, call exiftool again without the "-f" flag to
ascertain whether the tag is absent or the value is a literal "-".
---
 exiftool.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/exiftool.el b/exiftool.el
index e477ed9..06c056e 100644
--- a/exiftool.el
+++ b/exiftool.el
@@ -89,7 +89,10 @@ value. If no TAGS are specified, read all tags from FILE.
      (string-match "\\([^:]*\\): \\(.*\\)" line)
      (let ((tag (match-string 1 line))
 	   (value (match-string 2 line)))
-       (cons tag (if (equal value "-") "" value))))
+       (cons tag (if (equal value "-")
+		     (exiftool-command "-s" "-s" "-s"
+				       (format "-%s" tag) file)
+		   value))))
    (split-string
     (apply 'exiftool-command
 	   "-s" "-s" "-f"
-- 
cgit v1.2.3