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")
"/radix/packages/patches") (compose list
(filter (partial string-suffix? (partial (flip string-append)
"/guix/current/share/guile/site/3.0") "/radix/packages/patches")
%load-path))) dirname
dirname)))