packages: Use a more general %patch-path definition so patched package builds works on cuirass

pull/3/head
Luis Guilherme Coelho 2024-02-20 01:50:10 -03:00
parent 21c2cdc993
commit 99b7997992
No known key found for this signature in database
GPG Key ID: 1F2E76ACE3F531C8
1 changed files with 7 additions and 5 deletions

View File

@ -1,10 +1,12 @@
(define-module (radix packages) (define-module (radix packages)
#:use-module (gnu packages)
#:use-module (radix combinators) #:use-module (radix combinators)
#:export (%patch-path)) #:export (%patch-path))
(define %patch-path (define %patch-path
(map (partial (flip string-append) (and=> (search-path %load-path "radix/packages.scm")
(compose list
(partial (flip string-append)
"/radix/packages/patches") "/radix/packages/patches")
(filter (partial string-suffix? dirname
"/guix/current/share/guile/site/3.0") dirname)))
%load-path)))