01/13: gnu: perl-image-exiftool: Add upstream URL.

[guix-commits]

nckx pushed a commit to branch master
in repository guix.

commit 0234f4af2709baa62822a84d12e543c203922590
Author: Tobias Geerinckx-Rice <address@hidden>
Date:   Mon Mar 11 10:32:36 2019 +0100

    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(-)

diff --git a/gnu/packages/photo.scm b/gnu/packages/photo.scm
index 15857c6..88b9ea0 100644
--- a/gnu/packages/photo.scm
+++ b/gnu/packages/photo.scm
@@ -208,14 +208,17 @@ MTP, and much more.")
   (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