From 0234f4af2709baa62822a84d12e543c203922590 Mon Sep 17 00:00:00 2001
From: Tobias Geerinckx-Rice <me@tobias.gr>
Date: Mon, 11 Mar 2019 10:32:36 +0100
Subject: gnu: perl-image-exiftool: Add upstream URL.

* gnu/packages/photo.scm (perl-image-exiftool)[source]: Also download
from the home page.
---
 gnu/packages/photo.scm | 19 +++++++++++--------
 1 file changed, 11 insertions(+), 8 deletions(-)

(limited to 'gnu/packages/photo.scm')

diff --git a/gnu/packages/photo.scm b/gnu/packages/photo.scm
index 15857c6cad..88b9ea023f 100644
--- a/gnu/packages/photo.scm
+++ b/gnu/packages/photo.scm
@@ -208,14 +208,17 @@ (define-public perl-image-exiftool
   (package
     (name "perl-image-exiftool")
     (version "11.11")
-    (source (origin
-              (method url-fetch)
-              (uri (string-append
-                    "mirror://cpan/authors/id/E/EX/EXIFTOOL/Image-ExifTool-"
-                    version ".tar.gz"))
-              (sha256
-               (base32
-                "1szg1k82nz88pp5n7lg71ja7q3hh5i5f9bcbb7m482dwrmsywkp6"))))
+    (source
+     (origin
+       (method url-fetch)
+       (uri (list
+             (string-append "mirror://cpan/authors/id/E/EX/EXIFTOOL/"
+                            "Image-ExifTool-" version ".tar.gz")
+             ;; New releases may take a while to hit CPAN.
+             (string-append "https://www.sno.phy.queensu.ca/~phil/exiftool/"
+                            "Image-ExifTool-" version ".tar.gz")))
+       (sha256
+        (base32 "1szg1k82nz88pp5n7lg71ja7q3hh5i5f9bcbb7m482dwrmsywkp6"))))
     (build-system perl-build-system)
     (arguments
      '(#:phases
-- 
cgit v1.2.3


From 130c12c9b9a61ec6863307c55cf7685527684b7e Mon Sep 17 00:00:00 2001
From: Tobias Geerinckx-Rice <me@tobias.gr>
Date: Mon, 11 Mar 2019 10:34:44 +0100
Subject: gnu: perl-image-exiftool: Update to 11.31.

* gnu/packages/photo.scm (perl-image-exiftool): Update to 11.31.
---
 gnu/packages/photo.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'gnu/packages/photo.scm')

diff --git a/gnu/packages/photo.scm b/gnu/packages/photo.scm
index 88b9ea023f..ec693d72b3 100644
--- a/gnu/packages/photo.scm
+++ b/gnu/packages/photo.scm
@@ -207,7 +207,7 @@ (define-public gphoto2
 (define-public perl-image-exiftool
   (package
     (name "perl-image-exiftool")
-    (version "11.11")
+    (version "11.31")
     (source
      (origin
        (method url-fetch)
@@ -218,7 +218,7 @@ (define-public perl-image-exiftool
              (string-append "https://www.sno.phy.queensu.ca/~phil/exiftool/"
                             "Image-ExifTool-" version ".tar.gz")))
        (sha256
-        (base32 "1szg1k82nz88pp5n7lg71ja7q3hh5i5f9bcbb7m482dwrmsywkp6"))))
+        (base32 "1kplb7hvhrhqxkr4ddc44q7a3fs0r8svv2jlh325nwkfi7aa5kz5"))))
     (build-system perl-build-system)
     (arguments
      '(#:phases
-- 
cgit v1.2.3