04/05: profiles: Adjust packages->manifest pattern for inferior packages.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit 723f5b1dc984f3111ce06ad186b400c867ebb235
Author: Kyle Meyer <address@hidden>
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 <address@hidden>
---
 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 <address@hidden>
 ;;; Copyright © 2017 Huang Ying <address@hidden>
 ;;; Copyright © 2017 Maxim Cournoyer <address@hidden>
+;;; Copyright © 2019 Kyle Meyer <address@hidden>
 ;;;
 ;;; 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))