ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-11-14 10:55:23 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

build-system/asdf: Don't fail in sbcl-package->cl-source-package on non-package inputs.

Browse source 
Inputs can be non-packages, for instance (origin ...).
sbcl-package->cl-source-package used to fail if such inputs were present in
the parent sbcl-* package.

* guix/build-system/asdf.scm (package-with-build-system): Fix
'has-from-build-system?' function.
This commit is contained in:
Pierre Neidhardt 2021-11-17 09:09:42 +01:00
parent ad9b5cd19b
commit 56db786591
No known key found for this signature in database
GPG key ID: 9BDCF497A4BBCC7F
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
guix/build-system/asdf.scm
View file

@ -162,7 +162,8 @@ (define (transform-package-name name)
name))
(define (has-from-build-system? pkg)
(eq? from-build-system (package-build-system pkg)))
(and (package? pkg)
(eq? from-build-system (package-build-system pkg))))
(define (find-input-package pkg)
(let* ((name (package-name pkg))