guix_mirror_bot pushed a commit to branch master
in repository guix.

commit f3e74ef25d479ed77f7cc029d312425b7776c3b0
Author: Ada Stevenson <[email protected]>
AuthorDate: Wed Jun 4 13:24:42 2025 +0800

    gnu: clisp: Actually fix failing test.
    
    This is a follow up to f2acfcc3fdd31082f909b8edc39f278c8cf14e45 that didn't
    actually fix the issue with patching the paths.
    
    * gnu/packages/lisp.scm (clisp)[arguments]<#:phases>: In ‘patch-sh-and-pwd’,
    patch ‘cat’ reference for the streamslong test.
    Rename the phase to ‘patch-references’.
    
    Change-Id: I16363fad0c20a83d5aaa763799001a32b2725584
    Signed-off-by: Hilton Chain <[email protected]>
    Modified-by: Hilton Chain <[email protected]>
---
 gnu/packages/lisp.scm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/lisp.scm b/gnu/packages/lisp.scm
index 3a047294d6..7fda9225d9 100644
--- a/gnu/packages/lisp.scm
+++ b/gnu/packages/lisp.scm
@@ -559,7 +559,7 @@ Definition Facility.")
                             "--with-module=rawsock")
        #:phases
        (modify-phases %standard-phases
-         (add-after 'unpack 'patch-sh-and-pwd
+         (add-after 'unpack 'patch-references
            (lambda _
              ;; The package is very messy with its references to "/bin/sh" and
              ;; some other absolute paths to traditional tools.  These appear 
in
@@ -574,6 +574,8 @@ Definition Facility.")
                (("/bin/sh") "sh"))
              (substitute* '("src/clisp-link.in")
                (("/bin/pwd") "pwd"))
+             (substitute* '("tests/streamslong.tst")
+               (("/bin/cat") "cat"))
              #t))
          (add-after 'unpack 'replace-asdf
            ;; Use system ASDF instead of bundled one.

Reply via email to