civodul pushed a commit to branch master
in repository guix.
commit 723f5b1dc984f3111ce06ad186b400c867ebb235
Author: Kyle Meyer <[email protected]>
Date: Sat Jun 29 01:50:15 2019 -0400
profiles: Adjust packages->manifest pattern for inferior packages.
* guix/profiles.scm (packages->manifest): Add package? predicate to
`(package
output)' pattern to avoid incorrectly matching `(inferior-package output)',
which should be handled by a later clause.
Signed-off-by: Ludovic Courtès <[email protected]>
---
guix/profiles.scm | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/guix/profiles.scm b/guix/profiles.scm
index dfc9ba1..f5c8639 100644
--- a/guix/profiles.scm
+++ b/guix/profiles.scm
@@ -8,6 +8,7 @@
;;; Copyright © 2016 Chris Marusich <[email protected]>
;;; Copyright © 2017 Huang Ying <[email protected]>
;;; Copyright © 2017 Maxim Cournoyer <[email protected]>
+;;; Copyright © 2019 Kyle Meyer <[email protected]>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -337,7 +338,7 @@ denoting a specific output of a package."
(manifest
(map (match-lambda
- ((package output)
+ (((? package? package) output)
(package->manifest-entry package output))
((? package? package)
(package->manifest-entry package))
