X-Git-Url: https://git.donarmstrong.com/?p=bin.git;a=blobdiff_plain;f=archive_photos;h=291f1fb41372fad2abf44911100d9c10e87481b2;hp=82a633516bd5c75fa6bde61543fa2a27dacdbbaa;hb=859e8122a8db5fe78a0c5723cb68013ce47dfa07;hpb=4f092b957548ae1d87dc6ca70cd3fe99e797cf31

diff --git a/archive_photos b/archive_photos
index 82a6335..291f1fb 100755
--- a/archive_photos
+++ b/archive_photos
@@ -129,7 +129,7 @@ find(sub { if (-f $_ or -l $_) {$existing_files{$_} = $File::Find::name;} },$opt
 for my $file (@files) {
     my $file_basename=basename($file);
     # find out when the photo was shot
-    my $info = ImageInfo($file);
+    my $info = ImageInfo($file,[qw(CreateDate Serial)]);
     if (not defined $info->{CreateDate}) {
         print STDERR "No date information for $file\n";
         next;
@@ -162,7 +162,7 @@ sub are_the_same_files{
         if (-e $f->{name}) {
             $f->{exists} = 1;
             if (not exists $f->{info} or not defined $f->{info}) {
-                $f->{info} = ImageInfo($f->{name});
+                $f->{info} = ImageInfo($f->{name},[qw(CreateDate Serial)]);
             }
         } else {
             $f->{exists} = 0;