From acef524961d4da3464dbc392699fbe7deb0a467b Mon Sep 17 00:00:00 2001 From: Saku Laesvuori Date: Sat, 2 Dec 2023 19:23:05 +0200 Subject: 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 --- guix/import/stackage.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'guix/import/stackage.scm') diff --git a/guix/import/stackage.scm b/guix/import/stackage.scm index 00814c7d46..f801835b33 100644 --- a/guix/import/stackage.scm +++ b/guix/import/stackage.scm @@ -92,7 +92,7 @@ (define (lts-package-version packages name) "Return the version of the package with upstream NAME included in PACKAGES." (let ((pkg (find (lambda (pkg) (string=? (stackage-package-name pkg) name)) packages))) - (stackage-package-version pkg))) + (and=> pkg stackage-package-version))) ;;; -- cgit v1.2.3