guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

05/07: rakudo-build-system: Don't double wrap programs.


From: guix-commits
Subject: 05/07: rakudo-build-system: Don't double wrap programs.
Date: Thu, 22 Apr 2021 08:05:01 -0400 (EDT)

civodul pushed a commit to branch core-updates
in repository guix.

commit b6753aa1e1041df0a787ec28e58384dc10a3c05c
Author: Brendan Tildesley <mail@brendan.scot>
AuthorDate: Sun Sep 13 15:45:56 2020 +1000

    rakudo-build-system: Don't double wrap programs.
    
    * guix/build/rakudo-build-system.scm (wrap): Don't return any potential
    already wrapped-programs in the list-of-files to wrap.
    
    Signed-off-by: Ludovic Courtès <ludo@gnu.org>
---
 guix/build/rakudo-build-system.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/guix/build/rakudo-build-system.scm 
b/guix/build/rakudo-build-system.scm
index dbdeb1c..b2c090f 100644
--- a/guix/build/rakudo-build-system.scm
+++ b/guix/build/rakudo-build-system.scm
@@ -97,7 +97,8 @@
     (map (cut string-append dir "/" <>)
          (or (scandir dir (lambda (f)
                             (let ((s (stat (string-append dir "/" f))))
-                              (eq? 'regular (stat:type s)))))
+                              (and (eq? 'regular (stat:type s))
+                                   (not (wrapped-program? f))))))
              '())))
 
   (define bindirs



reply via email to

[Prev in Thread] Current Thread [Next in Thread]