me
/
guix
Archived
1
0
Fork 0

guix: import: stackage: Fix crash on recursive import

* guix/import/stackage.scm (lts-package-version): Call
  stackage-package-version only when the package is found.

Change-Id: Ic8d7c1b7a42a9c1a6cbba567e148706507a53ee3
Signed-off-by: Lars-Dominik Braun <lars@6xq.net>
Saku Laesvuori 2023-12-02 19:23:05 +02:00 committed by Lars-Dominik Braun
parent 160385c013
commit acef524961
No known key found for this signature in database
GPG Key ID: F663943E08D8092A
1 changed files with 1 additions and 1 deletions

View File

@ -92,7 +92,7 @@
"Return the version of the package with upstream NAME included in PACKAGES." "Return the version of the package with upstream NAME included in PACKAGES."
(let ((pkg (find (lambda (pkg) (string=? (stackage-package-name pkg) name)) (let ((pkg (find (lambda (pkg) (string=? (stackage-package-name pkg) name))
packages))) packages)))
(stackage-package-version pkg))) (and=> pkg stackage-package-version)))
;;; ;;;