summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorFlorian Pritz <bluewind@xinu.at>2017-12-02 23:05:16 +0100
committerFlorian Pritz <bluewind@xinu.at>2017-12-02 23:05:16 +0100
commit24dc561ded664c9e963358574f3406257389a4ce (patch)
tree2a5d8e496b7567d1875262d5e05a623e76c2de6c
parent3f10f46abecc2715d3c4a69482d4b7658949a3e0 (diff)
downloadbin-24dc561ded664c9e963358574f3406257389a4ce.tar.gz
bin-24dc561ded664c9e963358574f3406257389a4ce.tar.xz
sort-images: Use correct modification date
Signed-off-by: Florian Pritz <bluewind@xinu.at>
-rwxr-xr-xsort-images2
1 files changed, 1 insertions, 1 deletions
diff --git a/sort-images b/sort-images
index 8f64811..b187301 100755
--- a/sort-images
+++ b/sort-images
@@ -1,6 +1,6 @@
#!/bin/sh
-perl-rename -v 'BEGIN{use Image::ExifTool qw(ImageInfo); use Date::Parse; use Date::Format;}; $data = ImageInfo($_); $date = time2str("%Y-%m-%d", str2time($data->{FileModifyDate})); $_ = "$date/$_";' "$@"
+perl-rename -v 'BEGIN{use Image::ExifTool qw(ImageInfo); use Date::Parse; use Date::Format;}; $data = ImageInfo($_); $date = time2str("%Y-%m-%d", str2time($data->{ModifyDate})); $_ = "$date/$_";' "$@"
# the same in slow
#for i in "$@"; do