exclude metadata from file storage system
authorMischa POSLAWSKY <perl@shiar.org>
Fri, 14 Feb 2020 22:59:01 +0000 (23:59 +0100)
committerMischa POSLAWSKY <perl@shiar.org>
Fri, 14 Feb 2020 23:04:51 +0000 (00:04 +0100)
Storage details are unrelated for git data.

termimg

diff --git a/termimg b/termimg
index ef57cd3470bde52cede38cf8c1fefbe409eef8ca..24f6a33613a6048d84af5cff5bdf996f97a4923f 100755 (executable)
--- a/termimg
+++ b/termimg
@@ -7,6 +7,7 @@ my @info = eval {
        my $exif = Image::ExifTool->new->ImageInfo($file, {
                CoordFormat => '%.5f',
                DateFormat => '%Y-%m-%d %H:%M:%S',
        my $exif = Image::ExifTool->new->ImageInfo($file, {
                CoordFormat => '%.5f',
                DateFormat => '%Y-%m-%d %H:%M:%S',
+               Exclude => 'System:*',
        });
        die "exiftool: $exif->{Error}\n" if $exif->{Error};
        return (
        });
        die "exiftool: $exif->{Error}\n" if $exif->{Error};
        return (
@@ -19,7 +20,7 @@ my @info = eval {
                        $exif->{SVGVersion} // $exif->{PDFVersion} // (),
                ),
                $exif->{ColorType} ? "$exif->{BitDepth}bpp $exif->{ColorType}" : (),
                        $exif->{SVGVersion} // $exif->{PDFVersion} // (),
                ),
                $exif->{ColorType} ? "$exif->{BitDepth}bpp $exif->{ColorType}" : (),
-               sprintf('exif x%d', scalar %{$exif}),
+               sprintf('exif (%d)', scalar %{$exif}),
                $exif->{Thumb} ? "thumb $exif->{ThumbnailLength}B" : (),
                (map "@ $_",
                        $exif->{DateTimeOriginal} //
                $exif->{Thumb} ? "thumb $exif->{ThumbnailLength}B" : (),
                (map "@ $_",
                        $exif->{DateTimeOriginal} //