02/06: gnu: python-sip: Use PYTHON-VERSION.

[guix-commits]

mbakke pushed a commit to branch staging
in repository guix.

commit 8cbb32da7dfa53b15f2ecec7361e24961bb93bbc
Author: Marius Bakke <marius@gnu.org>
AuthorDate: Sun Jun 7 22:38:30 2020 +0200

    gnu: python-sip: Use PYTHON-VERSION.
    
    * gnu/packages/qt.scm (python-sip)[arguments]: Add #:imported-modules.
    Rewrite phase to use PYTHON-VERSION instead of custom implementation.
---
 gnu/packages/qt.scm | 11 ++++-------
 1 file changed, 4 insertions(+), 7 deletions(-)

diff --git a/gnu/packages/qt.scm b/gnu/packages/qt.scm
index 31f6134..2b3096a 100644
--- a/gnu/packages/qt.scm
+++ b/gnu/packages/qt.scm
@@ -1901,7 +1901,10 @@ and binaries removed, and adds modular support for using 
system libraries.")
      `(("python" ,python-wrapper)))
     (arguments
      `(#:tests? #f ; no check target
+       #:imported-modules ((guix build python-build-system)
+                           ,@%gnu-build-system-modules)
        #:modules ((srfi srfi-1)
+                  ((guix build python-build-system) #:select (python-version))
                   ,@%gnu-build-system-modules)
        #:phases
        (modify-phases %standard-phases
@@ -1911,14 +1914,8 @@ and binaries removed, and adds modular support for using 
system libraries.")
                     (bin (string-append out "/bin"))
                     (include (string-append out "/include"))
                     (python (assoc-ref inputs "python"))
-                    (python-version
-                      (last (string-split python #\-)))
-                    (python-major+minor
-                      (string-join
-                        (take (string-split python-version #\.) 2)
-                        "."))
                     (lib (string-append out "/lib/python"
-                                        python-major+minor
+                                        (python-version python)
                                         "/site-packages")))
                (invoke "python" "configure.py"
                        "--bindir" bin