From 9f6509c655b766b0fb9dfab181a8533e698473b0 Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Wed, 5 Aug 2015 04:12:14 -0400 Subject: python-build-system: Fix 'get-python-version'. * guix/build/python-build-system.scm (get-python-version): Rewrite to handle multiple-digit version number components. --- guix/build/python-build-system.scm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'guix') diff --git a/guix/build/python-build-system.scm b/guix/build/python-build-system.scm index d008ac2c69..1ae42c00b4 100644 --- a/guix/build/python-build-system.scm +++ b/guix/build/python-build-system.scm @@ -55,7 +55,10 @@ #t)) (define (get-python-version python) - (string-take (string-take-right python 5) 3)) + (let* ((version (last (string-split python #\-))) + (components (string-split version #\.)) + (major+minor (take components 2))) + (string-join major+minor "."))) (define* (install #:key outputs inputs (configure-flags '()) #:allow-other-keys) -- cgit v1.2.3