01/01: import: hackage: Default to https urls.

[Efraim Flashner]

efraim pushed a commit to branch master
in repository guix.

commit 18f747350437136b203ef6400176d1fb07b131ea
Author: ng0 <address@hidden>
Date:   Tue Aug 30 12:08:21 2016 +0000

    import: hackage: Default to https urls.
    
    * guix/import/hackage.scm (hackage-source-url, hackage-cabal-url): Use https
    for hackage.haskell.org.
---
 guix/import/hackage.scm |    7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/guix/import/hackage.scm b/guix/import/hackage.scm
index f07f453..9af78ea 100644
--- a/guix/import/hackage.scm
+++ b/guix/import/hackage.scm
@@ -1,6 +1,7 @@
 ;;; GNU Guix --- Functional package management for GNU
 ;;; Copyright © 2015 Federico Beffa <address@hidden>
 ;;; Copyright © 2016 Eric Bavier <address@hidden>
+;;; Coypright © 2016 ng0 <address@hidden>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -74,7 +75,7 @@
 (define (hackage-source-url name version)
   "Given a Hackage package NAME and VERSION, return a url to the source
 tarball."
-  (string-append "http://hackage.haskell.org/package/"; name
+  (string-append "https://hackage.haskell.org/package/"; name
                  "/" name "-" version ".tar.gz"))
 
 (define* (hackage-cabal-url name #:optional version)
@@ -82,9 +83,9 @@ tarball."
 .cabal file on Hackage.  If VERSION is #f or missing, the url for the latest
 version is returned."
   (if version
-      (string-append "http://hackage.haskell.org/package/";
+      (string-append "https://hackage.haskell.org/package/";
                      name "-" version "/" name ".cabal")
-      (string-append "http://hackage.haskell.org/package/";
+      (string-append "https://hackage.haskell.org/package/";
                      name "/" name ".cabal")))
 
 (define (hackage-name->package-name name)