diff options
| author | Arun Isaac | 2017-06-14 00:14:28 +0530 |
|---|---|---|
| committer | Arun Isaac | 2017-06-14 00:14:28 +0530 |
| commit | f0a2e91f49758f0e12310f9961386fe95fb579e4 (patch) | |
| tree | 1a1aa9622087cc301ee8d69f92d050db85bbbd85 | |
| parent | b678cffcac678ed0254c5f9e881dc4486816d3c8 (diff) | |
| download | exiftool.el-f0a2e91f49758f0e12310f9961386fe95fb579e4.tar.gz exiftool.el-f0a2e91f49758f0e12310f9961386fe95fb579e4.tar.lz exiftool.el-f0a2e91f49758f0e12310f9961386fe95fb579e4.zip | |
Copy only provided tags.
* exiftool.el (exiftool-copy): Append "-all:all" to exiftool command
only when no tags are provided.
| -rw-r--r-- | exiftool.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/exiftool.el b/exiftool.el index cf7a89f..77d829d 100644 --- a/exiftool.el +++ b/exiftool.el @@ -106,8 +106,10 @@ If no TAGS are specified, copy all tags from SOURCE." "-overwrite_original" "-tagsFromFile" source (append - (mapcar (apply-partially 'format "-%s") tags) - (list "-all:all" destination))) + (if tags + (mapcar (apply-partially 'format "-%s") tags) + (list "-all:all")) + (list destination))) (message "Tags from %s copied to %s" source destination) destination) |