From 18e9979970eb3a2cc9e0afca4a64c220ce6ebe5b Mon Sep 17 00:00:00 2001 From: Maxim Cournoyer Date: Fri, 22 Jan 2021 09:39:01 -0500 Subject: build/python: Replace PYTHONPATH by GUIX_PYTHONPATH. * guix/build/python-build-system.scm (add-installed-pythonpath): Replace "PYTHONPATH" by "GUIX_PYTHONPATH". --- guix/build/python-build-system.scm | 13 ++++++------- 1 file changed, 6 insertions(+), 7 deletions(-) diff --git a/guix/build/python-build-system.scm b/guix/build/python-build-system.scm index c6c88e6577..8e359398e1 100644 --- a/guix/build/python-build-system.scm +++ b/guix/build/python-build-system.scm @@ -170,14 +170,13 @@ (string-append out "/lib/python" (python-version python) "/site-packages"))) (define (add-installed-pythonpath inputs outputs) - "Prepend the Python site-package of OUTPUT to PYTHONPATH. This is useful + "Add the Python site-package of OUTPUT to GUIX_PYTHONPATH. This is useful when running checks after installing the package." - (let ((old-path (getenv "PYTHONPATH")) - (add-path (site-packages inputs outputs))) - (setenv "PYTHONPATH" - (string-append add-path - (if old-path (string-append ":" old-path) ""))) - #t)) + (let ((old-path (getenv "GUIX_PYTHONPATH")) + (new-path (site-packages inputs outputs))) + (setenv "GUIX_PYTHONPATH" + (string-append new-path + (if old-path (string-append ":" old-path) ""))))) (define* (install #:key inputs outputs (configure-flags '()) use-setuptools? #:allow-other-keys) -- cgit v1.2.3