01/01: import: cran: Fix off-by-one error.

[Ricardo Wurmus]

rekado pushed a commit to branch master
in repository guix.

commit e3100110ce9c1861f64a638ffd91fd34e15db77c
Author: Ricardo Wurmus <address@hidden>
Date:   Thu Nov 3 16:03:28 2016 +0100

    import: cran: Fix off-by-one error.
    
    * guix/import/cran.scm (package->upstream-name): Do not include leading
    slash in upstream name URL.
---
 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 e839af5..3fb2e21 100644
--- a/guix/import/cran.scm
+++ b/guix/import/cran.scm
@@ -231,7 +231,7 @@ s-expression corresponding to that package, or #f on 
failure."
                     (start (string-rindex url #\/)))
                 ;; The URL ends on
                 ;; (string-append "/" name "_" version ".tar.gz")
-                (substring url start end)))
+                (substring url (+ start 1) end)))
              (_ #f)))
           (_ #f)))))