nckx pushed a commit to branch master
in repository guix.

commit ab45b38feada5bf4721c8f1018b9cc9d7250069e
Author: Tobias Geerinckx-Rice <m...@tobias.gr>
Date:   Sat Aug 11 15:05:30 2018 +0200

    gnu: Use static & unversioned CPAN home pages.
    
    Constructing home pages to be version-specific is not something we
    really want or do elsewhere, and interferers with mass updates like the
    one I'm about to make.
    
    * gnu/packages/glib.scm (perl-net-dbus-glib)[home-page]: Use canonical
    home page.
    * gnu/packages/perl-check.scm (perl-test-nowarnings, perl-test-output)
    (perl-test-simple, perl-test-tester)[home-page]: Likewise.
    * gnu/packages/perl.scm (perl-benchmark-timer, perl-clone)
    (perl-digest-sha1, perl-file-which, perl-getopt-tabular, perl-io-string)
    (perl-ipc-run3, perl-probe-perl, perl-regexp-common, perl-sys-cpu)
    [home-page]: Likewise.
    * gnu/packages/tcl.scm (perl-tk)[home-page]: Likewise.
    * gnu/packages/tls.scm (perl-net-ssleay)[home-page]: Likewise.
    * gnu/packages/web.scm (perl-www-curl)[home-page]: Likewise.
    * gnu/packages/xml.scm (perl-xml-dom)[home-page]: Likewise.
    * gnu/packages/xorg.scm (perl-x11-protocol-other)[home-page]: Likewise.
---
 gnu/packages/glib.scm       |  2 +-
 gnu/packages/perl-check.scm | 13 ++++---------
 gnu/packages/perl.scm       | 29 ++++++++++-------------------
 gnu/packages/tcl.scm        |  2 +-
 gnu/packages/tls.scm        |  2 +-
 gnu/packages/web.scm        |  2 +-
 gnu/packages/xml.scm        |  2 +-
 gnu/packages/xorg.scm       |  3 +--
 8 files changed, 20 insertions(+), 35 deletions(-)

diff --git a/gnu/packages/glib.scm b/gnu/packages/glib.scm
index 95d7976..adf85ed 100644
--- a/gnu/packages/glib.scm
+++ b/gnu/packages/glib.scm
@@ -878,7 +878,7 @@ of the DBus APIs, not concerning itself yet with the GLib 
or QT wrappers.")
      `(("pkg-config" ,pkg-config)))
     (inputs
      `(("dbus-glib" ,dbus-glib)))
-    (home-page "http://search.cpan.org/~danberr/Net-DBus-GLib-0.33.0/";)
+    (home-page "http://search.cpan.org/dist/Net-DBus-GLib/";)
     (synopsis "Perl extension for the DBus GLib bindings")
     (description "This package provides an extension to the @code{Net::DBus}
 module allowing integration with the GLib mainloop.  To integrate with the
diff --git a/gnu/packages/perl-check.scm b/gnu/packages/perl-check.scm
index 89a761f..b753cdc 100644
--- a/gnu/packages/perl-check.scm
+++ b/gnu/packages/perl-check.scm
@@ -864,8 +864,7 @@ stored.  It automatically adds an extra test that will run 
when your script
 ends to check that there were no warnings.  If there were any warnings, the
 test will fail and output diagnostics of where, when and what the warning was,
 including a stack trace of what was going on when it occurred.")
-    (home-page (string-append "http://search.cpan.org/~adamk//";
-                              "Test-NoWarnings-" version))
+    (home-page "http://search.cpan.org/~adamk/Test-NoWarnings";)
     (license lgpl2.1)))
 
 (define-public perl-test-number-delta
@@ -912,8 +911,7 @@ usually called epsilon.  This module provides such a 
function for use with
      "Test::Output provides a simple interface for testing output sent to
 STDOUT or STDERR.  A number of different utilities are included to try and be
 as flexible as possible to the tester.")
-    (home-page (string-append "http://search.cpan.org/~bdfoy//";
-                              "Test-Output-" version))
+    (home-page "http://search.cpan.org/~bdfoy/Test-Output";)
     (license perl-license)))
 
 (define-public perl-test-pod
@@ -1114,8 +1112,7 @@ makes fork(2) safe to use in test cases.")
     (synopsis "Basic utilities for writing tests")
     (description
      "Test::Simple contains basic utilities for writing tests.")
-    (home-page (string-append "http://search.cpan.org/~exodist//";
-                              "Test-Simple-" version))
+    (home-page "http://search.cpan.org/~exodist/Test-Simple";)
     (license perl-license)))
 
 (define-public perl-test-taint
@@ -1160,9 +1157,7 @@ easy ways to check and report on the taintedness of your 
data, in standard
     (description
      "Test::Tester allows testing of test modules based on Test::Builder with
 a minimum of effort.")
-    (home-page (string-append "http://search.cpan.org/~fdaly//";
-                              "Test-Tester-" version))
-    ;; "Under the same license as Perl itself"
+    (home-page "http://search.cpan.org/~fdaly/Test-Tester";)
     (license perl-license)))
 
 (define-public perl-test-perltidy
diff --git a/gnu/packages/perl.scm b/gnu/packages/perl.scm
index 493b786..b96b480 100644
--- a/gnu/packages/perl.scm
+++ b/gnu/packages/perl.scm
@@ -543,8 +543,7 @@ conveniently, as well as benchmark code by allowing timings 
of repeated
 trials.  It is perfect for when you need more precise information about the
 running time of portions of your code than the Benchmark module will give you,
 but don't want to go all out and profile your code.")
-    (home-page (string-append "http://search.cpan.org/~dcoppit/";
-                              "Benchmark-Timer-" version "/"))
+    (home-page "http://search.cpan.org/~dcoppit/Benchmark-Timer";)
     (license gpl2)))
 
 (define-public perl-bit-vector
@@ -1340,8 +1339,7 @@ arrays for their internal representation.")
      "This module provides a clone() method which makes recursive copies of
 nested hash, array, scalar and reference types, including tied variables and
 objects.")
-    (home-page (string-append "http://search.cpan.org/~garu/";
-                              "Clone-" version "/"))
+    (home-page "http://search.cpan.org/~garu/Clone";)
     (license (package-license perl))))
 
 (define-public perl-clone-pp
@@ -2916,8 +2914,7 @@ input a message of arbitrary length and produces as 
output a
     (description
      "This package provides 'Digest::SHA1', an implementation of the NIST
 SHA-1 message digest algorithm for use by Perl programs.")
-    (home-page (string-append "http://search.cpan.org/~gaas/Digest-SHA1-";
-                              version "/SHA1.pm"))
+    (home-page "http://search.cpan.org/~gaas/Digest-SHA1";)
     (license (package-license perl))))
 
 (define-public perl-dist-checkconflicts
@@ -3757,8 +3754,7 @@ a safe way.")
      "File::Which was created to be able to get the paths to executable
 programs on systems under which the `which' program wasn't implemented in the
 shell.")
-    (home-page (string-append "http://search.cpan.org/~adamk//";
-                              "File-Which-" version))
+    (home-page "http://search.cpan.org/~adamk/File-Which";)
     (license (package-license perl))))
 
 (define-public perl-file-zglob
@@ -3855,8 +3851,7 @@ usage (help) messages, data validation, and a few other 
useful features.")
     (description
      "Getopt::Tabular is a Perl 5 module for table-driven argument parsing,
 vaguely inspired by John Ousterhout's Tk_ParseArgv.")
-    (home-page (string-append "http://search.cpan.org/~gward//";
-                              "Getopt-Tabular-" version))
+    (home-page "http://search.cpan.org/~gward/Getopt-Tabular";)
     (license (package-license perl))))
 
 (define-public perl-graph
@@ -4207,7 +4202,7 @@ and busy().")
         (base32
          "18755m410yl70s17rgq3m0hyxl8r5mr47vsq1rw7141d8kc4lgra"))))
     (build-system perl-build-system)
-    (home-page "http://search.cpan.org/~gaas/IO-String-1.08//";)
+    (home-page "http://search.cpan.org/dist/IO-String";)
     (synopsis "Emulate file interface for in-core strings")
     (description "IO::String is an IO::File (and IO::Handle) compatible class
 that reads or writes data from in-core strings.")
@@ -4321,8 +4316,7 @@ both supported and may be mixed.")
 stdout, and/or stderr to files and perl data structures.  It aims to satisfy
 99% of the need for using system, qx, and open3 with a simple, extremely
 Perlish API and none of the bloat and rarely used features of IPC::Run.")
-    (home-page (string-append "http://search.cpan.org/~rjbs//";
-                              "IPC-Run3-" version))
+    (home-page "http://search.cpan.org/~rjbs/IPC-Run3";)
     ;; "You may use this module under the terms of the BSD, Artistic, or GPL
     ;; licenses, any version."
     (license (list bsd-3 gpl3+))))
@@ -7045,8 +7039,7 @@ applications.")
      "Probe::Perl provides methods for obtaining information about the
 currently running perl interpreter.  It originally began life as code in the
 Module::Build project, but has been externalized here for general use.")
-    (home-page (string-append "http://search.cpan.org/~kwilliams//";
-                              "Probe-Perl-" version))
+    (home-page "http://search.cpan.org/~kwilliams/Probe-Perl";)
     (license (package-license perl))))
 
 (define-public perl-proc-invokeeditor
@@ -7138,8 +7131,7 @@ balanced parentheses and brackets, delimited text (with 
escapes), integers and
 floating-point numbers in any base (up to 36), comments in 44 languages,
 offensive language, lists of any pattern, IPv4 addresses, URIs, and Zip
 codes.")
-    (home-page (string-append "http://search.cpan.org/~abigail//";
-                              "Regexp-Common-" version))
+    (home-page "http://search.cpan.org/~abigail/Regexp-Common";)
     ;; Quad-licensed: Perl Artistic, Perl Artistic 2.0, X11, and BSD.
     (license (list (package-license perl) x11 bsd-3))))
 
@@ -7878,8 +7870,7 @@ TODO: {
     (description
      "Sys::CPU is a module for counting the number of CPUs on a system, and
 determining their type and clock speed.")
-    (home-page (string-append "http://search.cpan.org/~mzsanford//";
-                              "Sys-CPU-" version))
+    (home-page "http://search.cpan.org/~mzsanford/Sys-CPU";)
     (license (package-license perl))))
 
 (define-public perl-sys-hostname-long
diff --git a/gnu/packages/tcl.scm b/gnu/packages/tcl.scm
index 97e1427..317d10e 100644
--- a/gnu/packages/tcl.scm
+++ b/gnu/packages/tcl.scm
@@ -212,7 +212,7 @@ interfaces (GUIs) in the Tcl language.")
     (synopsis "Graphical user interface toolkit for Perl")
     (description
      "Tk is a Graphical User Interface ToolKit.")
-    (home-page (string-append "http://search.cpan.org/~srezic/Tk-"; version))
+    (home-page "http://search.cpan.org/~srezic/Tk";)
     ;; From the package README: "... you can redistribute it and/or modify it
     ;; under the same terms as Perl itself, with the exception of all the
     ;; files in the pTk sub-directory which have separate terms derived from
diff --git a/gnu/packages/tls.scm b/gnu/packages/tls.scm
index 73d4b02..614ee29 100644
--- a/gnu/packages/tls.scm
+++ b/gnu/packages/tls.scm
@@ -658,7 +658,7 @@ http servers, too), an sslcat() function for writing your 
own clients, and
 finally access to the SSL api of the SSLeay/OpenSSL package so you can write
 servers or clients for more complicated applications.")
     (license license:perl-license)
-    (home-page "http://search.cpan.org/~mikem/Net-SSLeay-1.66/";)))
+    (home-page "http://search.cpan.org/dist/Net-SSLeay";)))
 
 (define-public perl-crypt-openssl-rsa
  (package
diff --git a/gnu/packages/web.scm b/gnu/packages/web.scm
index 5cf2ec5..3256f2a 100644
--- a/gnu/packages/web.scm
+++ b/gnu/packages/web.scm
@@ -3688,7 +3688,7 @@ RFC 6570.")
      "This is a Perl extension interface for the libcurl file downloading
 library.")
     (license l:perl-license)
-    (home-page 
"http://search.cpan.org/~szbalint/WWW-Curl-4.17/lib/WWW/Curl.pm";)))
+    (home-page "http://search.cpan.org/dist/WWW-Curl";)))
 
 (define-public perl-www-mechanize
   (package
diff --git a/gnu/packages/xml.scm b/gnu/packages/xml.scm
index c75b8b6..b86daa7 100644
--- a/gnu/packages/xml.scm
+++ b/gnu/packages/xml.scm
@@ -637,7 +637,7 @@ XML::Parser module is built on top of XML::Parser::Expat, 
which is a lower
 level interface to James Clark's expat library.  XML::DOM::Parser is derived
 from XML::Parser.  It parses XML strings or files and builds a data structure
 that conforms to the API of the Document Object Model.")
-    (home-page 
"http://search.cpan.org/~tjmather/XML-DOM-1.44/lib/XML/DOM.pm";)))
+    (home-page "http://search.cpan.org/dist/XML-DOM";)))
 
 (define-public perl-xml-compile-tester
   (package
diff --git a/gnu/packages/xorg.scm b/gnu/packages/xorg.scm
index 9d9069b..6092f34 100644
--- a/gnu/packages/xorg.scm
+++ b/gnu/packages/xorg.scm
@@ -5845,8 +5845,7 @@ interface to its methods (using @code{Mouse}).")
     (description
      "X11::Protocol is a client-side interface to the X11 Protocol, allowing
 perl programs to display windows and graphics on X11 servers.")
-    (home-page
-     (string-append "https://metacpan.org/release/SMCCAM/X11-Protocol-"; 
version))
+    (home-page "https://metacpan.org/release/X11-Protocol";)
     ;; From the package README: "you can redistribute and/or modify it under
     ;; the same terms as Perl itself. (As an exception, the file
     ;; Keysyms.pm,which is derived from a file in the standard X11

Reply via email to