From 17ad0a2714271dd3567808637f451d86f1291cab Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Fri, 8 Jan 2016 19:06:26 +0100 Subject: [PATCH] build-system/python: 'pypi-uri' takes an optional file name extension. Suggested by swedebugia . * guix/build-system/python.scm (pypi-uri): Add 'extension' parameter and use it. --- guix/build-system/python.scm | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/guix/build-system/python.scm b/guix/build-system/python.scm index 2532210a49..86efc1a715 100644 --- a/guix/build-system/python.scm +++ b/guix/build-system/python.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2013, 2014, 2015 Ludovic Courtès +;;; Copyright © 2013, 2014, 2015, 2016 Ludovic Courtès ;;; Copyright © 2013 Andreas Enge ;;; Copyright © 2013 Nikita Karetnikov ;;; @@ -41,12 +41,13 @@ (define-module (guix build-system python) ;; ;; Code: -(define (pypi-uri name version) +(define* (pypi-uri name version #:optional (extension ".tar.gz")) "Return a URI string for the Python package hosted on the Python Package -Index (PyPI) corresponding to NAME and VERSION." +Index (PyPI) corresponding to NAME and VERSION. EXTENSION is the file name +extension, such as '.tar.gz'." (string-append "https://pypi.python.org/packages/source/" (string-take name 1) "/" name "/" - name "-" version ".tar.gz")) + name "-" version extension)) (define %python-build-system-modules ;; Build-side modules imported by default.