[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[bug#67564] [PATCH 2/3] guix: import: stackage: Fix crash on recursive i
From: |
Saku Laesvuori |
Subject: |
[bug#67564] [PATCH 2/3] guix: import: stackage: Fix crash on recursive import |
Date: |
Fri, 1 Dec 2023 11:29:47 +0200 |
* guix/import/stackage.scm (lts-package-version): Call
stackage-package-version only when the package is found.
Change-Id: Ic8d7c1b7a42a9c1a6cbba567e148706507a53ee3
---
guix/import/stackage.scm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
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)))
;;;
--
2.41.0