From 053cfdb3d6a692e32e504f6993ef3e54bc68e754 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Wed, 21 Oct 2015 14:40:39 +0200
Subject: [PATCH] import: cran: Avoid HTTP redirect.

* guix/import/cran.scm (cran-fetch): Add trailing slash in URL to avoid
  HTTP redirect.
---
 guix/import/cran.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/guix/import/cran.scm b/guix/import/cran.scm
index 218d55787a..1491ca14e3 100644
--- a/guix/import/cran.scm
+++ b/guix/import/cran.scm
@@ -93,7 +93,7 @@ first cell of a table row is considered a label cell."
   "Return an sxml representation of the CRAN page for the R package NAME,
 or #f on failure.  NAME is case-sensitive."
   ;; This API always returns the latest release of the module.
-  (let ((cran-url (string-append %cran-url name)))
+  (let ((cran-url (string-append %cran-url name "/")))
     (false-if-exception
      (xml->sxml (http-fetch cran-url)
                 #:trim-whitespace? #t