diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2019-08-13 13:35:02 +0100 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2019-08-13 13:35:02 +0100 |
| commit | 65a6d6d3fb51f00581ec8d64231af2b6c207b139 (patch) | |
| tree | 1e2aa4276e35e0430f3ea159011583557d813ee4 /bin/ifuse-photos-to-tmp | |
| parent | b1367f99c7508f289e92740e967b0d38a1f1970b (diff) | |
| download | dotfiles-65a6d6d3fb51f00581ec8d64231af2b6c207b139.tar.gz | |
comment
Diffstat (limited to 'bin/ifuse-photos-to-tmp')
| -rwxr-xr-x | bin/ifuse-photos-to-tmp | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/bin/ifuse-photos-to-tmp b/bin/ifuse-photos-to-tmp index 3efc1724..3bff5c06 100755 --- a/bin/ifuse-photos-to-tmp +++ b/bin/ifuse-photos-to-tmp @@ -52,6 +52,8 @@ unless (grep { /ifuse on $mount/ } `mount`) { my $epoch = DateTime->new(year => 1970, month => 1, day => 1); my $epoch_formatter = DateTime::Format::Epoch->new(epoch => $epoch, ); find(sub { + # defend against ImageInfo changing $_ (which obeys dynamic, + # not lexical, scoping rules) my $file = $_; # we handle any file, images or not, falling back to mtime if # we can't extract EXIF data |