gal-mj-digikam: sort by date

diff --git a/gal/bin/gal-mj-digikam b/gal/bin/gal-mj-digikam
index e222e5d4505f4c6af54131366c83342190ca61a3..435cf256b9c70861c1811ad419db800aa16d2e28 100755 (executable)
--- a/gal/bin/gal-mj-digikam
+++ b/gal/bin/gal-mj-digikam
@@ -40,7 +40,7 @@ print "## Tag ID: $tag_id\n";
 
 open OUT, '|-', $ENV{GALLERY_ROOT} . '/bin/gal-scan' or die "Cannot feed gal scan\n";
 for my $r (@{$dbh->selectall_arrayref(
-       'SELECT i.name AS name FROM Images i JOIN ImageTags t ON (i.id = t.imageid) WHERE i.album=? AND t.tagid=? ORDER BY i.name',
+       'SELECT i.name AS name FROM Images i JOIN ImageTags t ON (i.id = t.imageid) WHERE i.album=? AND t.tagid=? ORDER BY i.modificationDate',
        { Slice => {} },
        $album_id, $tag_id)}) {
        print OUT "$photos_root/$album/" . $r->{name}, "\n";