03/03: gnu: cl-py4cl: Fix path to python3.

[guix-commits]

glv pushed a commit to branch master
in repository guix.

commit 917c25b3ba0575c6c6e44f8af0d1365bb2378220
Author: Paul A. Patience <paul@apatience.com>
AuthorDate: Tue Apr 12 02:55:35 2022 +0000

    gnu: cl-py4cl: Fix path to python3.
    
    * gnu/packages/lisp-xyz.scm (sbcl-py4cl)[arguments]: Add the
      'fix-python3-path' phase.
    
    Signed-off-by: Guillaume Le Vaillant <glv@posteo.net>
---
 gnu/packages/lisp-xyz.scm | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm
index 16dbad904b..0065f56e7e 100644
--- a/gnu/packages/lisp-xyz.scm
+++ b/gnu/packages/lisp-xyz.scm
@@ -5181,6 +5181,12 @@ port within a range.")
       (arguments
        '(#:phases
          (modify-phases %standard-phases
+           (add-after 'unpack 'fix-python3-path
+             (lambda _
+               (substitute* "src/callpython.lisp"
+                 (("\\*python-command\\* \"python\"")
+                  (string-append "*python-command* "
+                                 "\"" (which "python3") "\"")))))
            (add-after 'unpack 'replace-*base-directory*-var
              (lambda* (#:key outputs #:allow-other-keys)
                ;; In the ASD, the author makes an attempt to