From mboxrd@z Thu Jan  1 00:00:00 1970
From: swedebugia <swedebugia@riseup.net>
Subject: bug#33867: Folding with origin-uri fails for inherited packages
Date: Tue, 25 Dec 2018 12:43:38 +0100
Message-ID: <213acfca-4a92-4494-4a0c-b8fc100d6f10@riseup.net>
Mime-Version: 1.0
Content-Type: text/plain; charset=utf-8; format=flowed
Content-Transfer-Encoding: quoted-printable
Return-path: <bug-guix-bounces+gcggb-bug-guix=m.gmane.org@gnu.org>
Received: from eggs.gnu.org ([208.118.235.92]:37773)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <Debian-debbugs@debbugs.gnu.org>) id 1gbl2E-00011T-6C
	for bug-guix@gnu.org; Tue, 25 Dec 2018 06:38:06 -0500
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
	(envelope-from <Debian-debbugs@debbugs.gnu.org>) id 1gbl2A-0006r4-5E
	for bug-guix@gnu.org; Tue, 25 Dec 2018 06:38:06 -0500
Received: from debbugs.gnu.org ([208.118.235.43]:58688)
	by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16)
	(Exim 4.71) (envelope-from <Debian-debbugs@debbugs.gnu.org>)
	id 1gbl2A-0006qv-1s
	for bug-guix@gnu.org; Tue, 25 Dec 2018 06:38:02 -0500
Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2)
	(envelope-from <Debian-debbugs@debbugs.gnu.org>) id 1gbl29-0003JJ-Uw
	for bug-guix@gnu.org; Tue, 25 Dec 2018 06:38:01 -0500
Sender: "Debbugs-submit" <debbugs-submit-bounces@debbugs.gnu.org>
Resent-Message-ID: <handler.33867.B.154573783712666@debbugs.gnu.org>
Received: from eggs.gnu.org ([208.118.235.92]:37694)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <swedebugia@riseup.net>) id 1gbl1J-0000yD-4c
	for bug-guix@gnu.org; Tue, 25 Dec 2018 06:37:09 -0500
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
	(envelope-from <swedebugia@riseup.net>) id 1gbl1F-0006IX-3x
	for bug-guix@gnu.org; Tue, 25 Dec 2018 06:37:09 -0500
Received: from mx1.riseup.net ([198.252.153.129]:55173)
	by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_256_CBC_SHA1:32)
	(Exim 4.71) (envelope-from <swedebugia@riseup.net>)
	id 1gbl1E-0006Hq-Tt
	for bug-guix@gnu.org; Tue, 25 Dec 2018 06:37:05 -0500
Received: from cotinga.riseup.net (cotinga-pn.riseup.net [10.0.1.164])
	(using TLSv1 with cipher ECDHE-RSA-AES256-SHA (256/256 bits))
	(Client CN "*.riseup.net",
	Issuer "COMODO RSA Domain Validation Secure Server CA" (verified OK))
	by mx1.riseup.net (Postfix) with ESMTPS id 5E1881A09D8
	for <bug-guix@gnu.org>; Tue, 25 Dec 2018 03:37:03 -0800 (PST)
Received: from [127.0.0.1] (localhost [127.0.0.1])
	by cotinga.riseup.net with ESMTPSA id C383710590B
	for <bug-guix@gnu.org>; Tue, 25 Dec 2018 03:37:02 -0800 (PST)
Content-Language: en-US
List-Id: Bug reports for GNU Guix <bug-guix.gnu.org>
List-Unsubscribe: <https://lists.gnu.org/mailman/options/bug-guix>,
	<mailto:bug-guix-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/archive/html/bug-guix/>
List-Post: <mailto:bug-guix@gnu.org>
List-Help: <mailto:bug-guix-request@gnu.org?subject=help>
List-Subscribe: <https://lists.gnu.org/mailman/listinfo/bug-guix>,
	<mailto:bug-guix-request@gnu.org?subject=subscribe>
Errors-To: bug-guix-bounces+gcggb-bug-guix=m.gmane.org@gnu.org
Sender: "bug-Guix" <bug-guix-bounces+gcggb-bug-guix=m.gmane.org@gnu.org>
To: 33867@debbugs.gnu.org

Is this a bug?

scheme@(guix-user) [1]> (define snakes
                        (fold-packages
                             (lambda (package lst)
                                 (if (string-prefix? "python"
                                       (package-name package))
                                        (cons (origin-uri package) lst)
                              lst))
                         '()))
... ... ... ... ... ... ... <unnamed port>:15:45: In procedure=20
origin-uri: Wrong type argument: #<package python2-defusedxml@0.5.0=20
gnu/packages/xml.scm:1235 2220300>

Entering a new prompt.  Type `,bt' for a backtrace or `,q' to continue.
scheme@(guix-user) [2]> ,bt
In current input:
     11:23  5 (_)
In guix/discovery.scm:
     155:3  4 (fold-module-public-variables _ _ _)
In guix/combinators.scm:
     45:26  3 (fold2 #<procedure 1138b20 at guix/discovery.scm:155:10=20
(mod=E2=80=A6> =E2=80=A6)
     45:26  2 (fold2 #<procedure 1144620 at guix/discovery.scm:156:19=20
(var=E2=80=A6> =E2=80=A6)
In guix/discovery.scm:
    158:33  1 (_ #<package python2-defusedxml@0.5.0=20
gnu/packages/xml.scm:1=E2=80=A6> =E2=80=A6)
In current input:
     15:45  0 (_ _ _)


--=20
Cheers Swedebugia