GNU bug report logs - #33078
wpa-supplicant service API change leads to breakage

Please note: This is a static page, with minimal formatting, updated once a day.
Click here to see this page with the latest information and nicer formatting.

Package: guix; Reported by: Mark H Weaver <mhw@HIDDEN>; dated Wed, 17 Oct 2018 19:44:02 UTC; Maintainer for guix is bug-guix@HIDDEN.
Changed bug title to 'wpa-supplicant service API change leads to breakage' from 'Attempt to build my GuixSD system now fails' Request was from ludo@HIDDEN (Ludovic Courtès) to control <at> debbugs.gnu.org. Full text available.

Message received at 33078 <at> debbugs.gnu.org:


Received: (at 33078) by debbugs.gnu.org; 7 Nov 2018 21:42:06 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Wed Nov 07 16:42:06 2018
Received: from localhost ([127.0.0.1]:40006 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1gKVaQ-00057t-BO
	for submit <at> debbugs.gnu.org; Wed, 07 Nov 2018 16:42:06 -0500
Received: from eggs.gnu.org ([208.118.235.92]:42066)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <ludo@HIDDEN>) id 1gKVaO-00057P-K3
 for 33078 <at> debbugs.gnu.org; Wed, 07 Nov 2018 16:42:05 -0500
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
 (envelope-from <ludo@HIDDEN>) id 1gKVaI-0002rr-Hp
 for 33078 <at> debbugs.gnu.org; Wed, 07 Nov 2018 16:41:59 -0500
X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00 autolearn=disabled
 version=3.3.2
Received: from fencepost.gnu.org ([2001:4830:134:3::e]:36952)
 by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from <ludo@HIDDEN>)
 id 1gKVZz-0002jF-Mc; Wed, 07 Nov 2018 16:41:40 -0500
Received: from [2a01:e0a:1d:7270:af76:b9b:ca24:c465] (port=39750 helo=ribbon)
 by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256)
 (Exim 4.82) (envelope-from <ludo@HIDDEN>)
 id 1gKVZy-0004Ga-8C; Wed, 07 Nov 2018 16:41:38 -0500
From: ludo@HIDDEN (Ludovic =?utf-8?Q?Court=C3=A8s?=)
To: Marius Bakke <mbakke@HIDDEN>
Subject: Re: bug#33078: Attempt to build my GuixSD system now fails
References: <87d0s8nyvi.fsf@HIDDEN> <87woqgfgb8.fsf@HIDDEN>
 <87tvlkfdl1.fsf@HIDDEN> <87y3auf33w.fsf@HIDDEN>
Date: Wed, 07 Nov 2018 22:41:37 +0100
In-Reply-To: <87y3auf33w.fsf@HIDDEN> ("Ludovic
 \=\?utf-8\?Q\?Court\=C3\=A8s\=22'\?\=
 \=\?utf-8\?Q\?s\?\= message of "Fri, 19 Oct 2018 16:00:35 +0200")
Message-ID: <87h8gssgz2.fsf@HIDDEN>
User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/26.1 (gnu/linux)
MIME-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic]
X-Received-From: 2001:4830:134:3::e
X-Spam-Score: -5.0 (-----)
X-Debbugs-Envelope-To: 33078
Cc: 33078 <at> debbugs.gnu.org, Mark H Weaver <mhw@HIDDEN>
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -6.0 (------)

Hey Marius,

Ping!  :-)

Ludo=E2=80=99.

ludo@HIDDEN (Ludovic Court=C3=A8s) skribis:

> Hello,
>
> Marius Bakke <mbakke@HIDDEN> skribis:
>
>> Marius Bakke <mbakke@HIDDEN> writes:
>>
>>> Mark H Weaver <mhw@HIDDEN> writes:
>>>
>>>>   (services (cons* (console-keymap-service keymap)
>>>>                    ;;(xfce-desktop-service)
>>>>                    (gnome-desktop-service)
>>>>                    (service network-manager-service-type
>>>>                             (network-manager-configuration))
>>>>                    (service wpa-supplicant-service-type wpa-supplicant)
>>>
>>> To adapt to the new interface, this should be changed to:
>>>
>>> (service wpa-supplicant-service-type)
>>>
>>> ...though it would be good to have backwards compatibility here.  WDYT
>>> of this approach?
>>
>> [...]
>>=20=20=20
>>>  (define wpa-supplicant-service-type
>>> -  (let ((config->package
>>> -         (match-lambda
>>> -           (($ <wpa-supplicant-configuration> wpa-supplicant)
>>> -            (list wpa-supplicant)))))
>>> -    (service-type (name 'wpa-supplicant)
>>> -                  (extensions
>>> -                   (list (service-extension shepherd-root-service-type
>>> -                                            wpa-supplicant-shepherd-se=
rvice)
>>> -                         (service-extension dbus-root-service-type con=
fig->package)
>>> -                         (service-extension profile-service-type confi=
g->package)))
>>> -                  (description "Run the WPA Supplicant daemon, a servi=
ce that
>>> +  (lambda* (#:optional wpa-supplicant-package)      ;deprecated
>>> +    (let ((package
>>> +           (if wpa-supplicant-package
>>> +               wpa-supplicant-package
>>> +               (match-lambda
>>> +                 (($ <wpa-supplicant-configuration> wpa-supplicant)
>>> +                  (list wpa-supplicant))))))
>>
>> Derp, this obviously won't work.
>>
>> I've tried various incarnations to match a package object in the
>> match-lambda with little success.  Suggestions?
>
> =E2=80=98wpa-supplicant-service-type=E2=80=99 must remain a <service-type=
> record, so
> the above cannot work.
>
> Maybe this?
>
> diff --git a/gnu/services/networking.scm b/gnu/services/networking.scm
> index 61a0e975c..391c6ec59 100644
> --- a/gnu/services/networking.scm
> +++ b/gnu/services/networking.scm
> @@ -1077,7 +1077,9 @@ networking."))))
>    (let ((config->package
>           (match-lambda
>             (($ <wpa-supplicant-configuration> wpa-supplicant)
> -            (list wpa-supplicant)))))
> +            (list wpa-supplicant))
> +           ((? package? package)
> +            (list package)))))
>      (service-type (name 'wpa-supplicant)
>                    (extensions
>                     (list (service-extension shepherd-root-service-type
>
>
> HTH,
> Ludo=E2=80=99.




Information forwarded to bug-guix@HIDDEN:
bug#33078; Package guix. Full text available.

Message received at 33078 <at> debbugs.gnu.org:


Received: (at 33078) by debbugs.gnu.org; 19 Oct 2018 14:00:50 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Fri Oct 19 10:00:50 2018
Received: from localhost ([127.0.0.1]:59630 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1gDVKb-0002Hk-Vl
	for submit <at> debbugs.gnu.org; Fri, 19 Oct 2018 10:00:50 -0400
Received: from eggs.gnu.org ([208.118.235.92]:37065)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <ludo@HIDDEN>) id 1gDVKb-0002HY-6G
 for 33078 <at> debbugs.gnu.org; Fri, 19 Oct 2018 10:00:49 -0400
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
 (envelope-from <ludo@HIDDEN>) id 1gDVKQ-0003va-CK
 for 33078 <at> debbugs.gnu.org; Fri, 19 Oct 2018 10:00:43 -0400
X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00 autolearn=disabled
 version=3.3.2
Received: from fencepost.gnu.org ([2001:4830:134:3::e]:41412)
 by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from <ludo@HIDDEN>)
 id 1gDVKQ-0003vT-65; Fri, 19 Oct 2018 10:00:38 -0400
Received: from [2001:660:6102:320:e120:2c8f:8909:cdfe] (port=45670 helo=ribbon)
 by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256)
 (Exim 4.82) (envelope-from <ludo@HIDDEN>)
 id 1gDVKP-0003bi-T0; Fri, 19 Oct 2018 10:00:38 -0400
From: ludo@HIDDEN (Ludovic =?utf-8?Q?Court=C3=A8s?=)
To: Marius Bakke <mbakke@HIDDEN>
Subject: Re: bug#33078: Attempt to build my GuixSD system now fails
References: <87d0s8nyvi.fsf@HIDDEN> <87woqgfgb8.fsf@HIDDEN>
 <87tvlkfdl1.fsf@HIDDEN>
X-URL: http://www.fdn.fr/~lcourtes/
X-Revolutionary-Date: 28 =?utf-8?Q?Vend=C3=A9miaire?= an 227 de la
 =?utf-8?Q?R=C3=A9volution?=
X-PGP-Key-ID: 0x090B11993D9AEBB5
X-PGP-Key: http://www.fdn.fr/~lcourtes/ludovic.asc
X-PGP-Fingerprint: 3CE4 6455 8A84 FDC6 9DB4  0CFB 090B 1199 3D9A EBB5
X-OS: x86_64-pc-linux-gnu
Date: Fri, 19 Oct 2018 16:00:35 +0200
In-Reply-To: <87tvlkfdl1.fsf@HIDDEN> (Marius Bakke's message of "Wed, 17
 Oct 2018 23:49:46 +0200")
Message-ID: <87y3auf33w.fsf@HIDDEN>
User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/26.1 (gnu/linux)
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="=-=-="
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic]
X-Received-From: 2001:4830:134:3::e
X-Spam-Score: -5.0 (-----)
X-Debbugs-Envelope-To: 33078
Cc: 33078 <at> debbugs.gnu.org, Mark H Weaver <mhw@HIDDEN>
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -6.0 (------)

--=-=-=
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable

Hello,

Marius Bakke <mbakke@HIDDEN> skribis:

> Marius Bakke <mbakke@HIDDEN> writes:
>
>> Mark H Weaver <mhw@HIDDEN> writes:
>>
>>>   (services (cons* (console-keymap-service keymap)
>>>                    ;;(xfce-desktop-service)
>>>                    (gnome-desktop-service)
>>>                    (service network-manager-service-type
>>>                             (network-manager-configuration))
>>>                    (service wpa-supplicant-service-type wpa-supplicant)
>>
>> To adapt to the new interface, this should be changed to:
>>
>> (service wpa-supplicant-service-type)
>>
>> ...though it would be good to have backwards compatibility here.  WDYT
>> of this approach?
>
> [...]
>=20=20=20
>>  (define wpa-supplicant-service-type
>> -  (let ((config->package
>> -         (match-lambda
>> -           (($ <wpa-supplicant-configuration> wpa-supplicant)
>> -            (list wpa-supplicant)))))
>> -    (service-type (name 'wpa-supplicant)
>> -                  (extensions
>> -                   (list (service-extension shepherd-root-service-type
>> -                                            wpa-supplicant-shepherd-ser=
vice)
>> -                         (service-extension dbus-root-service-type conf=
ig->package)
>> -                         (service-extension profile-service-type config=
->package)))
>> -                  (description "Run the WPA Supplicant daemon, a servic=
e that
>> +  (lambda* (#:optional wpa-supplicant-package)      ;deprecated
>> +    (let ((package
>> +           (if wpa-supplicant-package
>> +               wpa-supplicant-package
>> +               (match-lambda
>> +                 (($ <wpa-supplicant-configuration> wpa-supplicant)
>> +                  (list wpa-supplicant))))))
>
> Derp, this obviously won't work.
>
> I've tried various incarnations to match a package object in the
> match-lambda with little success.  Suggestions?

=E2=80=98wpa-supplicant-service-type=E2=80=99 must remain a <service-type> =
record, so
the above cannot work.

Maybe this?


--=-=-=
Content-Type: text/x-patch
Content-Disposition: inline

diff --git a/gnu/services/networking.scm b/gnu/services/networking.scm
index 61a0e975c..391c6ec59 100644
--- a/gnu/services/networking.scm
+++ b/gnu/services/networking.scm
@@ -1077,7 +1077,9 @@ networking."))))
   (let ((config->package
          (match-lambda
            (($ <wpa-supplicant-configuration> wpa-supplicant)
-            (list wpa-supplicant)))))
+            (list wpa-supplicant))
+           ((? package? package)
+            (list package)))))
     (service-type (name 'wpa-supplicant)
                   (extensions
                    (list (service-extension shepherd-root-service-type

--=-=-=
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: base64

DQpIVEgsDQpMdWRv4oCZLg0K
--=-=-=--




Information forwarded to bug-guix@HIDDEN:
bug#33078; Package guix. Full text available.

Message received at 33078 <at> debbugs.gnu.org:


Received: (at 33078) by debbugs.gnu.org; 17 Oct 2018 21:49:51 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Wed Oct 17 17:49:51 2018
Received: from localhost ([127.0.0.1]:55903 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1gCthP-0000aj-9Q
	for submit <at> debbugs.gnu.org; Wed, 17 Oct 2018 17:49:51 -0400
Received: from out3-smtp.messagingengine.com ([66.111.4.27]:42747)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mbakke@HIDDEN>) id 1gCthN-0000aa-8X
 for 33078 <at> debbugs.gnu.org; Wed, 17 Oct 2018 17:49:49 -0400
Received: from compute5.internal (compute5.nyi.internal [10.202.2.45])
 by mailout.nyi.internal (Postfix) with ESMTP id DB53322205;
 Wed, 17 Oct 2018 17:49:48 -0400 (EDT)
Received: from mailfrontend1 ([10.202.2.162])
 by compute5.internal (MEProxy); Wed, 17 Oct 2018 17:49:48 -0400
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=fastmail.com; h=
 from:to:subject:in-reply-to:references:date:message-id
 :mime-version:content-type; s=fm1; bh=aiochP5tzdtYkkR/e3QvVeTP7l
 3NsZCxVXvjo3/dDoo=; b=Kic9zxPVA8OomdXAMEP2Wf4v60WQJjPsQZPhw8jTHC
 4FeEEeDKe1GzxNqsHSlnoFTIVxklGd/Lzjgty96mvG8Nc7pdNCkSG0uDf8IP6lfZ
 Y87Fwm8VSfZtM5hPrTzr3ou2OGigZDenlj88CeBIJ/9fE6PIXb5ybBn8l9hQWaEK
 lcjGNIyFMRLrCKBsmSgv4eHDeMa+gCX/33UlxDmF74Gtn3luAbXQcxEB11wYXR2K
 yz3LAYykmd7SH5hfbIxONj6xEPvHp+DEBw9wXUVNz7XebqUTvdnOd6xKLtCKFYqP
 4M8+K5tAsgBXgBwaD9DATgurd3HemIyKlYz+2RtnaE7g==
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=
 messagingengine.com; h=content-type:date:from:in-reply-to
 :message-id:mime-version:references:subject:to:x-me-proxy
 :x-me-proxy:x-me-sender:x-me-sender:x-sasl-enc; s=fm1; bh=aiochP
 5tzdtYkkR/e3QvVeTP7l3NsZCxVXvjo3/dDoo=; b=anEuCf48NWcIa4giUZCkJ4
 AFOVffL5B5OPOVK4ieg3bHX7PyItXqOcuxoXSAg2YrOcn/MdZqpqzn/HJ8lyW7XL
 NMXtrd+JPDFBvtNT3eO68tek3JJHnvUHLaSyXcvREdojnkLrnrW8BIpenbDVeZto
 JKYNa0Qjs/b88/U7XSWlxtDTvn7ejJW1K7y03l2gcNHR1yuTkKt9VVrjdwroqVJv
 Vrq6PLbx4iAtDMxNBt7c9VqKLIVIKF4K6zmXTqb5929n02wh3/sZm00nhbemHtZj
 xB+LSr1uJ/jcM79Dmw5ibagYNm6vveRjLfrzFUSVqqgT4mNJVxMsKkuRJkrPHIng
 ==
X-ME-Sender: <xms:fK7HW4khtHNwrBltY4rx_q7C4ez6wrXwqENq_xmsv-9mw0MMi1woKA>
X-ME-Proxy: <xmx:fK7HW7_BrCriGgLOdfZvHe5MSknCgSfz00lNrL1CN9fU1341G22gOg>
 <xmx:fK7HW5utt4_brCmtTnAzefc3SP6fDdxkMPYodqcOmThKoEXCbj1zkQ>
 <xmx:fK7HW9QXdU7xNVdLY_FfVp7rqDxjVwxjjTAgDTFqSHdX3DJ8URcgdA>
 <xmx:fK7HWyZjNfx4tv-81rs3-ofsgq3MJzUYv1I5oEAxbpm8qPCXu3_qng>
 <xmx:fK7HW0_yflTBtTKbE0x5jWR2z-cCZQp9NuNDA_PkwQ5f5CquPbu5Yw>
 <xmx:fK7HW7afD8ANAxex-0WWhlOjY8fRHgbt9yd4wOFNh2HiT0m5JJDy8A>
Received: from localhost (140.226.16.62.customer.cdi.no [62.16.226.140])
 by mail.messagingengine.com (Postfix) with ESMTPA id F0009E4074;
 Wed, 17 Oct 2018 17:49:47 -0400 (EDT)
From: Marius Bakke <mbakke@HIDDEN>
To: Mark H Weaver <mhw@HIDDEN>, 33078 <at> debbugs.gnu.org
Subject: Re: bug#33078: Attempt to build my GuixSD system now fails
In-Reply-To: <87woqgfgb8.fsf@HIDDEN>
References: <87d0s8nyvi.fsf@HIDDEN> <87woqgfgb8.fsf@HIDDEN>
User-Agent: Notmuch/0.27 (https://notmuchmail.org) Emacs/26.1
 (x86_64-pc-linux-gnu)
Date: Wed, 17 Oct 2018 23:49:46 +0200
Message-ID: <87tvlkfdl1.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: multipart/signed; boundary="=-=-=";
 micalg=pgp-sha512; protocol="application/pgp-signature"
X-Spam-Score: -0.7 (/)
X-Debbugs-Envelope-To: 33078
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.7 (-)

--=-=-=
Content-Type: text/plain
Content-Transfer-Encoding: quoted-printable

Marius Bakke <mbakke@HIDDEN> writes:

> Mark H Weaver <mhw@HIDDEN> writes:
>
>>   (services (cons* (console-keymap-service keymap)
>>                    ;;(xfce-desktop-service)
>>                    (gnome-desktop-service)
>>                    (service network-manager-service-type
>>                             (network-manager-configuration))
>>                    (service wpa-supplicant-service-type wpa-supplicant)
>
> To adapt to the new interface, this should be changed to:
>
> (service wpa-supplicant-service-type)
>
> ...though it would be good to have backwards compatibility here.  WDYT
> of this approach?

[...]
=20=20
>  (define wpa-supplicant-service-type
> -  (let ((config->package
> -         (match-lambda
> -           (($ <wpa-supplicant-configuration> wpa-supplicant)
> -            (list wpa-supplicant)))))
> -    (service-type (name 'wpa-supplicant)
> -                  (extensions
> -                   (list (service-extension shepherd-root-service-type
> -                                            wpa-supplicant-shepherd-serv=
ice)
> -                         (service-extension dbus-root-service-type confi=
g->package)
> -                         (service-extension profile-service-type config-=
>package)))
> -                  (description "Run the WPA Supplicant daemon, a service=
 that
> +  (lambda* (#:optional wpa-supplicant-package)      ;deprecated
> +    (let ((package
> +           (if wpa-supplicant-package
> +               wpa-supplicant-package
> +               (match-lambda
> +                 (($ <wpa-supplicant-configuration> wpa-supplicant)
> +                  (list wpa-supplicant))))))

Derp, this obviously won't work.

I've tried various incarnations to match a package object in the
match-lambda with little success.  Suggestions?

--=-=-=
Content-Type: application/pgp-signature; name="signature.asc"

-----BEGIN PGP SIGNATURE-----

iQEzBAEBCgAdFiEEu7At3yzq9qgNHeZDoqBt8qM6VPoFAlvHrnoACgkQoqBt8qM6
VPqd9AgArHP4lTzeXcokXcR83FTPiFxlcQdZaEfa6pORmLYpqmJ/AcbGb1q1iyn1
/lVL7+BmMx3McRzC5vrmHDf10d4HP+GOI0CF8ugtrwlLrrR1S5pKb29QdRHNO2Nh
1RWiNy4Cpf5ALuiG9J5OwHhGSxyMx6ksEIwxIPUDiHTlSJU5KowLWjVIKqy8Vtyq
hsWctBtZe/4WrDwabzAYf8mAk7X/UviN3/Ch9k5uw642CJMkhVpMJAu4Vn3aRNLU
vHHe8Qv7ohCNm9kYkOciZUDfXy52Nuzj6wgqBvw1o1ydMTvixp2KZfdOP7FKwr2s
5YF7D3uN8rREV31lAfd7Tnw4sKqv7Q==
=TBMx
-----END PGP SIGNATURE-----
--=-=-=--




Information forwarded to bug-guix@HIDDEN:
bug#33078; Package guix. Full text available.

Message received at 33078 <at> debbugs.gnu.org:


Received: (at 33078) by debbugs.gnu.org; 17 Oct 2018 20:50:58 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Wed Oct 17 16:50:58 2018
Received: from localhost ([127.0.0.1]:55841 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1gCsmP-0007Ir-UM
	for submit <at> debbugs.gnu.org; Wed, 17 Oct 2018 16:50:58 -0400
Received: from out3-smtp.messagingengine.com ([66.111.4.27]:60543)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mbakke@HIDDEN>) id 1gCsmN-0007Ii-K5
 for 33078 <at> debbugs.gnu.org; Wed, 17 Oct 2018 16:50:56 -0400
Received: from compute5.internal (compute5.nyi.internal [10.202.2.45])
 by mailout.nyi.internal (Postfix) with ESMTP id C943D220DA;
 Wed, 17 Oct 2018 16:50:54 -0400 (EDT)
Received: from mailfrontend1 ([10.202.2.162])
 by compute5.internal (MEProxy); Wed, 17 Oct 2018 16:50:54 -0400
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=fastmail.com; h=
 from:to:subject:in-reply-to:references:date:message-id
 :mime-version:content-type; s=fm1; bh=2RJFymQBiUFHoV9gsJU5vjIEXE
 BG/oy8jLn62mCuDA0=; b=kSqQ8IGIt8MeufyFaiAyTe5fKmBw2bk/md8+dU2Ea5
 ywm1cVt6Pwm8JFtgJcJ5MOu3Gl3+NkVOI3DuE1yA6uz9bcn1GpFGFcv/CkdT5UWV
 4Bszu2/UF3oO/HUlyMwD98Ho5vyxYgmB3PmgrG0gUBKV6qlHPxc5tvo/XCKl+LzT
 AjjbwkCetbNpOgU37F2j5irtp/IdM3uV36brlGpLOxcGSYzHXGstvELCxC4cb2Yi
 EGYfBy1qJsK/46DdXHIKxHDoh3nIavIzEI5VOwkVCEc/XJugq+0tyHD9jMfWFTuU
 MbjTuQUVLaNlIBidoyBjjDxc6zfYtdyZLzhIA7hSwkBQ==
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=
 messagingengine.com; h=content-type:date:from:in-reply-to
 :message-id:mime-version:references:subject:to:x-me-proxy
 :x-me-proxy:x-me-sender:x-me-sender:x-sasl-enc; s=fm1; bh=2RJFym
 QBiUFHoV9gsJU5vjIEXEBG/oy8jLn62mCuDA0=; b=d6XN+5+aupgRmAWvNKAGoI
 YvSh8NaLQ/ifS0xCazrJ5YSl6NnElIqOHJ3Ah9tlXCKpRjHMMf8DhFV2ZKXjo7zK
 5EmVj3OtwTkiMM2DjNcu5tG8a6n2hSKrSwsuEHGdJIsqctWsC6SUuiVK4JCjnA7Z
 hkPB0AnTNiOlb1RO3dUqjrtgLQbVJYF8BbxXGzyM7uoZ8tg3Em32pO46JDX9K8S5
 pHEQ6tNjKIUKqMFBnKFI38wnE8cjl5spvIFQxf2PKRplnnYx3d4ZLJZRZ+CdZY6G
 A9t/6Oi+UB7JG4NdxVd/WdZ9tyaZdh7Il7HhZgasJOLI8Al5MuUAP/sVP9jrJMEA
 ==
X-ME-Sender: <xms:rqDHW2lpc97sz_xnGbPen4YWZe1fxTq6T3Io2szaJbts6W8RUP59Ew>
X-ME-Proxy: <xmx:rqDHW96sUFEYEpSrb30Z-qx876362E77V6tCFt14BdzXVBKKvPNxqA>
 <xmx:rqDHW7EEmi8OcEg8moQLDaK54tT1sU1Yg_32PvLY9RT4BIdnChuu7A>
 <xmx:rqDHW2RO0Z05mzlU3ADpKfAww5aYU8no7Fo86a25Li8miTmz2l4MlQ>
 <xmx:rqDHW0u2giS-bcatl1jL436osBwgUHfDVLGiZabq9po-8bwy6FN3HA>
 <xmx:rqDHW1zrKrBQO80aQIR6TFb4zRLB7mqOL24L8qmi99WktAdd5tgdFg>
 <xmx:rqDHW1-nnjDlG3udYhXjFqevs4h3BYNWdTLFMo68jFjXmmuT3KAPlw>
Received: from localhost (140.226.16.62.customer.cdi.no [62.16.226.140])
 by mail.messagingengine.com (Postfix) with ESMTPA id A835BE4074;
 Wed, 17 Oct 2018 16:50:53 -0400 (EDT)
From: Marius Bakke <mbakke@HIDDEN>
To: Mark H Weaver <mhw@HIDDEN>, 33078 <at> debbugs.gnu.org
Subject: Re: bug#33078: Attempt to build my GuixSD system now fails
In-Reply-To: <87d0s8nyvi.fsf@HIDDEN>
References: <87d0s8nyvi.fsf@HIDDEN>
User-Agent: Notmuch/0.27 (https://notmuchmail.org) Emacs/26.1
 (x86_64-pc-linux-gnu)
Date: Wed, 17 Oct 2018 22:50:51 +0200
Message-ID: <87woqgfgb8.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: multipart/signed; boundary="==-=-=";
 micalg=pgp-sha512; protocol="application/pgp-signature"
X-Spam-Score: -0.7 (/)
X-Debbugs-Envelope-To: 33078
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.7 (-)

--==-=-=
Content-Type: multipart/mixed; boundary="=-=-="

--=-=-=
Content-Type: text/plain

Mark H Weaver <mhw@HIDDEN> writes:

> When I try to build my x86_64 GuixSD system, based on my system
> configuration which I've not modified since May, it now fails:

[...]

> In gnu/services/networking.scm:
>    1076:9  0 (config->package _)
>
> gnu/services/networking.scm:1076:9: In procedure config->package:
> Throw to key `match-error' with args `("match" "no matching pattern" #<package wpa-supplicant@HIDDEN gnu/packages/admin.scm:1147 3246780>)'.

Whoops, sorry for this breakage!

> Here's my system configuration:

[...]

>   (services (cons* (console-keymap-service keymap)
>                    ;;(xfce-desktop-service)
>                    (gnome-desktop-service)
>                    (service network-manager-service-type
>                             (network-manager-configuration))
>                    (service wpa-supplicant-service-type wpa-supplicant)

To adapt to the new interface, this should be changed to:

(service wpa-supplicant-service-type)

...though it would be good to have backwards compatibility here.  WDYT
of this approach?


--=-=-=
Content-Type: text/x-patch
Content-Disposition: inline

1 file changed, 15 insertions(+), 12 deletions(-)
gnu/services/networking.scm | 27 +++++++++++++++------------

modified   gnu/services/networking.scm
@@ -1072,19 +1072,22 @@ networking."))))
             (stop #~(make-kill-destructor)))))))
 
 (define wpa-supplicant-service-type
-  (let ((config->package
-         (match-lambda
-           (($ <wpa-supplicant-configuration> wpa-supplicant)
-            (list wpa-supplicant)))))
-    (service-type (name 'wpa-supplicant)
-                  (extensions
-                   (list (service-extension shepherd-root-service-type
-                                            wpa-supplicant-shepherd-service)
-                         (service-extension dbus-root-service-type config->package)
-                         (service-extension profile-service-type config->package)))
-                  (description "Run the WPA Supplicant daemon, a service that
+  (lambda* (#:optional wpa-supplicant-package)      ;deprecated
+    (let ((package
+           (if wpa-supplicant-package
+               wpa-supplicant-package
+               (match-lambda
+                 (($ <wpa-supplicant-configuration> wpa-supplicant)
+                  (list wpa-supplicant))))))
+      (service-type (name 'wpa-supplicant)
+                    (extensions
+                     (list (service-extension shepherd-root-service-type
+                                              wpa-supplicant-shepherd-service)
+                           (service-extension dbus-root-service-type package)
+                           (service-extension profile-service-type package)))
+                    (description "Run the WPA Supplicant daemon, a service that
 implements authentication, key negotiation and more for wireless networks.")
-                  (default-value (wpa-supplicant-configuration)))))
+                    (default-value (wpa-supplicant-configuration))))))
 
 
 ;;;

[back]
--=-=-=--

--==-=-=
Content-Type: application/pgp-signature; name="signature.asc"

-----BEGIN PGP SIGNATURE-----

iQEzBAEBCgAdFiEEu7At3yzq9qgNHeZDoqBt8qM6VPoFAlvHoKwACgkQoqBt8qM6
VPoLdAf+M+sdstBasq+5qtWLjbYrNZM5TrG5dPfS5L+CUazt3+8GlqQqwg4qbbLP
vqyNd/J4onf4TJhJ8v0Q88HRTenLsCLWAa6BuVe8tqmYqcvKoQp3ciXPSYAtcEp4
mzvAAAgaKss6Jj9sLeiIOE1gtL+D9N3WYDV86QmGBK6TKgaMLzyR0Kh0WBjs6JUt
WUHsebGAtRkpbzwBrgCC4B1w/Ex261cTRIJ5fS3+vaZpT2ZjpTzfJuvQlEs/IiCN
5GtNSP9UySDDDiNu+V+PCkZLZxVD3N0V2GIX+vR7dLdlLacnziKuVlexqOHBvw+c
Hpkk9LsFuL6D0F2qIKMwfq8Nccazsw==
=LOKW
-----END PGP SIGNATURE-----
--==-=-=--




Information forwarded to bug-guix@HIDDEN:
bug#33078; Package guix. Full text available.

Message received at 33078 <at> debbugs.gnu.org:


Received: (at 33078) by debbugs.gnu.org; 17 Oct 2018 19:52:06 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Wed Oct 17 15:52:06 2018
Received: from localhost ([127.0.0.1]:55679 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1gCrrR-0005aj-Pr
	for submit <at> debbugs.gnu.org; Wed, 17 Oct 2018 15:52:05 -0400
Received: from world.peace.net ([64.112.178.59]:43534)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mhw@HIDDEN>) id 1gCrrP-0005a8-V2
 for 33078 <at> debbugs.gnu.org; Wed, 17 Oct 2018 15:52:04 -0400
Received: from mhw by world.peace.net with esmtpsa
 (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.89)
 (envelope-from <mhw@HIDDEN>)
 id 1gCrrJ-0006qd-QW; Wed, 17 Oct 2018 15:51:57 -0400
From: Mark H Weaver <mhw@HIDDEN>
To: 33078 <at> debbugs.gnu.org
Subject: Re: bug#33078: Attempt to build my GuixSD system now fails
References: <87d0s8nyvi.fsf@HIDDEN>
Date: Wed, 17 Oct 2018 15:51:43 -0400
In-Reply-To: <87d0s8nyvi.fsf@HIDDEN> (Mark H. Weaver's message of "Wed, 17
 Oct 2018 15:42:41 -0400")
Message-ID: <878t2wnygg.fsf@HIDDEN>
User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/26.1 (gnu/linux)
MIME-Version: 1.0
Content-Type: text/plain
X-Spam-Score: 0.0 (/)
X-Debbugs-Envelope-To: 33078
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

Mark H Weaver <mhw@HIDDEN> writes:
> When I try to build my x86_64 GuixSD system, based on my system
> configuration which I've not modified since May, it now fails:

Reverting commit acce0a474c1493ab18912bc46285248e4ccb0314 (services:
wpa-supplicant: Extend to support configuration parameters) seems to fix
the issue for me.  I guess my system configuration needs to be updated
to adapt to it, but it's not obvious what I need to do.

      Mark




Information forwarded to bug-guix@HIDDEN:
bug#33078; Package guix. Full text available.

Message received at submit <at> debbugs.gnu.org:


Received: (at submit) by debbugs.gnu.org; 17 Oct 2018 19:43:26 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Wed Oct 17 15:43:26 2018
Received: from localhost ([127.0.0.1]:55670 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1gCrj4-0005M2-D2
	for submit <at> debbugs.gnu.org; Wed, 17 Oct 2018 15:43:26 -0400
Received: from eggs.gnu.org ([208.118.235.92]:35556)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mhw@HIDDEN>) id 1gCrj3-0005Ln-2g
 for submit <at> debbugs.gnu.org; Wed, 17 Oct 2018 15:43:25 -0400
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
 (envelope-from <mhw@HIDDEN>) id 1gCrit-0002kJ-G6
 for submit <at> debbugs.gnu.org; Wed, 17 Oct 2018 15:43:17 -0400
X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00 autolearn=disabled
 version=3.3.2
Received: from lists.gnu.org ([2001:4830:134:3::11]:35409)
 by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_256_CBC_SHA1:32)
 (Exim 4.71) (envelope-from <mhw@HIDDEN>) id 1gCrit-0002jy-1T
 for submit <at> debbugs.gnu.org; Wed, 17 Oct 2018 15:43:15 -0400
Received: from eggs.gnu.org ([2001:4830:134:3::10]:45138)
 by lists.gnu.org with esmtp (Exim 4.71)
 (envelope-from <mhw@HIDDEN>) id 1gCrir-0000Gm-MJ
 for bug-guix@HIDDEN; Wed, 17 Oct 2018 15:43:14 -0400
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
 (envelope-from <mhw@HIDDEN>) id 1gCrio-0002ev-Am
 for bug-guix@HIDDEN; Wed, 17 Oct 2018 15:43:13 -0400
Received: from world.peace.net ([64.112.178.59]:59576)
 by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_256_CBC_SHA1:32)
 (Exim 4.71) (envelope-from <mhw@HIDDEN>) id 1gCrin-0002Zi-RH
 for bug-guix@HIDDEN; Wed, 17 Oct 2018 15:43:10 -0400
Received: from mhw by world.peace.net with esmtpsa
 (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.89)
 (envelope-from <mhw@HIDDEN>)
 id 1gCrib-0006ik-Ne; Wed, 17 Oct 2018 15:42:58 -0400
From: Mark H Weaver <mhw@HIDDEN>
To: bug-guix@HIDDEN
Subject: Attempt to build my GuixSD system now fails
Date: Wed, 17 Oct 2018 15:42:41 -0400
Message-ID: <87d0s8nyvi.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic]
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x
X-Received-From: 2001:4830:134:3::11
X-Spam-Score: -5.0 (-----)
X-Debbugs-Envelope-To: submit
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -6.0 (------)

When I try to build my x86_64 GuixSD system, based on my system
configuration which I've not modified since May, it now fails:

--8<---------------cut here---------------start------------->8---
mhw@jojen ~$ guix system build /etc/config.scm
Backtrace:
In srfi/srfi-1.scm:
   592:17 19 (map1 (#<<service> type: #<service-type profile 2b09=E2=80=A6>=
 =E2=80=A6))
In gnu/services.scm:
   778:26 18 (loop #<<service> type: #<service-type profile 2b09d20>=E2=80=
=A6>)
In srfi/srfi-1.scm:
   592:17 17 (map1 (#<<service> type: #<service-type shepherd-roo=E2=80=A6>=
 =E2=80=A6))
In gnu/services.scm:
   778:26 16 (loop #<<service> type: #<service-type shepherd-root 2b=E2=80=
=A6>)
In srfi/srfi-1.scm:
   592:29 15 (map1 (#<<service> type: #<service-type file-systems=E2=80=A6>=
 =E2=80=A6))
   592:29 14 (map1 (#<<service> type: #<service-type root-file-sy=E2=80=A6>=
 =E2=80=A6))
   592:29 13 (map1 (#<<service> type: #<service-type user-process=E2=80=A6>=
 =E2=80=A6))
   592:29 12 (map1 (#<<service> type: #<service-type host-name 2b=E2=80=A6>=
 =E2=80=A6))
   592:17 11 (map1 (#<<service> type: #<service-type account 2b09=E2=80=A6>=
 =E2=80=A6))
In gnu/services.scm:
   778:26 10 (loop #<<service> type: #<service-type account 2b09aa0>=E2=80=
=A6>)
In srfi/srfi-1.scm:
   592:29  9 (map1 (#<<service> type: #<service-type guix 240fc30=E2=80=A6>=
 =E2=80=A6))
   592:17  8 (map1 (#<<service> type: #<service-type dbus 240f910=E2=80=A6>=
 =E2=80=A6))
In gnu/services.scm:
   779:26  7 (loop #<<service> type: #<service-type dbus 240f910> va=E2=80=
=A6>)
In srfi/srfi-1.scm:
   592:29  6 (map1 (#<<service> type: #<service-type elogind 240f=E2=80=A6>=
 =E2=80=A6))
   592:29  5 (map1 (#<<service> type: #<service-type polkit 240f8=E2=80=A6>=
 =E2=80=A6))
   592:29  4 (map1 (#<<service> type: #<service-type colord 240f1=E2=80=A6>=
 =E2=80=A6))
   592:29  3 (map1 (#<<service> type: #<service-type upower 240f2=E2=80=A6>=
 =E2=80=A6))
   592:29  2 (map1 (#<<service> type: #<service-type udisks 240f1=E2=80=A6>=
 =E2=80=A6))
   592:17  1 (map1 (#<<service> type: #<service-type wpa-supplica=E2=80=A6>=
 =E2=80=A6))
In gnu/services/networking.scm:
   1076:9  0 (config->package _)

gnu/services/networking.scm:1076:9: In procedure config->package:
Throw to key `match-error' with args `("match" "no matching pattern" #<pack=
age wpa-supplicant@HIDDEN gnu/packages/admin.scm:1147 3246780>)'.
mhw@jojen ~$
--8<---------------cut here---------------end--------------->8---

Here's my system configuration:

--8<---------------cut here---------------start------------->8---
;; This is an operating system configuration template
;; for a "desktop" setup with GNOME and Xfce where the
;; root partition is encrypted with LUKS.

(use-modules (gnu) (gnu system nss) (srfi srfi-1) (guix packages))
(use-service-modules base desktop networking xorg dbus)
(use-package-modules certs gnome cryptsetup linux admin guile firmware xdis=
org libusb suckless)

(define keymap
  (plain-file
   "keymap"
   "keymaps 0-255
keycode 42 =3D Shift
keycode 54 =3D Shift
keycode 29 =3D Control
keycode 58 =3D Control
keycode 56 =3D Alt
keycode 100 =3D Alt
alt shift keycode 1 =3D Meta_Escape
alt shift keycode 2 =3D Meta_exclam
alt shift keycode 3 =3D Meta_at
alt shift keycode 4 =3D Meta_numbersign
alt shift keycode 5 =3D Meta_dollar
alt shift keycode 6 =3D Meta_percent
alt shift keycode 7 =3D Meta_asciicircum
shift control keycode 7 =3D Control_asciicircum
control alt keycode 7 =3D Meta_Control_asciicircum
shift control alt keycode 7 =3D Meta_Control_asciicircum
alt shift keycode 8 =3D Meta_ampersand
alt shift keycode 9 =3D Meta_asterisk
alt shift keycode 10 =3D Meta_parenleft
alt shift keycode 11 =3D Meta_parenright
alt shift keycode 12 =3D Meta_underscore
shift control keycode 12 =3D Control_underscore
control alt keycode 12 =3D Meta_Control_underscore
shift control alt keycode 12 =3D Meta_Control_underscore
alt shift keycode 13 =3D Meta_plus
alt shift keycode 14 =3D Meta_Delete
alt shift keycode 15 =3D Meta_Tab
alt shift keycode 16 =3D Meta_Q
alt shift keycode 17 =3D Meta_W
alt shift keycode 18 =3D Meta_E
alt shift keycode 19 =3D Meta_R
alt shift keycode 20 =3D Meta_T
alt shift keycode 21 =3D Meta_Y
alt shift keycode 22 =3D Meta_U
alt shift keycode 23 =3D Meta_I
alt shift keycode 24 =3D Meta_O
alt shift keycode 25 =3D Meta_P
alt shift keycode 26 =3D Meta_braceleft
control alt keycode 26 =3D Meta_Escape
alt shift keycode 27 =3D Meta_braceright
control alt keycode 27 =3D Meta_Control_bracketright
alt shift keycode 28 =3D Meta_Control_m
alt shift keycode 29 =3D Meta_Control
alt shift keycode 30 =3D Meta_A
alt shift keycode 31 =3D Meta_S
alt shift keycode 32 =3D Meta_D
alt shift keycode 33 =3D Meta_F
alt shift keycode 34 =3D Meta_G
alt shift keycode 35 =3D Meta_H
alt shift keycode 36 =3D Meta_J
alt shift keycode 37 =3D Meta_K
alt shift keycode 38 =3D Meta_L
alt shift keycode 39 =3D Meta_colon
alt shift keycode 40 =3D Meta_quotedbl
alt shift keycode 41 =3D Meta_asciitilde
alt shift keycode 43 =3D Meta_bar
control alt keycode 43 =3D Meta_Control_backslash
alt shift keycode 44 =3D Meta_Z
alt shift keycode 45 =3D Meta_X
alt shift keycode 46 =3D Meta_C
alt shift keycode 47 =3D Meta_V
alt shift keycode 48 =3D Meta_B
alt shift keycode 49 =3D Meta_N
alt shift keycode 50 =3D Meta_M
alt shift keycode 51 =3D Meta_less
alt shift keycode 52 =3D Meta_greater
alt shift keycode 53 =3D Meta_question
alt shift keycode 57 =3D Meta_space
"))

(operating-system
  (host-name "jojen")
  (timezone "US/Eastern")
  (locale "en_US.utf8")

  (bootloader (bootloader-configuration
	       (bootloader grub-bootloader)
	       (target "/dev/sda")))

  (kernel linux-libre)

  ;;(firmware (list ath9k-htc-firmware))
  (firmware '())

  ;; Specify a mapped device for the encrypted root partition.
  ;; The UUID is that returned by 'cryptsetup luksUUID'.
  (mapped-devices
   (list (mapped-device
          (source (uuid "a56c53e7-b345-4e24-a17b-6cf158dbc7d3"))
          (target "jojen-root")
          (type luks-device-mapping))))

  (file-systems (cons* (file-system
                         ;; FIXME: reference by the file system label?
                         (device "/dev/mapper/jojen-root")
                         (mount-point "/")
                         (type "btrfs")
                         (dependencies mapped-devices))
                       %base-file-systems))

  (users (cons* (user-account
                 (name "mhw")
                 (uid 1000)
                 (group "mhw")
                 (supplementary-groups '("wheel" "users" "netdev"
                                         "audio" "video" "dialout"))
                 (home-directory "/home/mhw"))
                %base-user-accounts))

  (groups (cons* (user-group
                  (name "mhw")
                  (id 1000))
                 %base-groups))

  (setuid-programs
   (list (file-append shadow "/bin/passwd")
         (file-append inetutils "/bin/ping")))

  ;; This is where we specify system-wide packages.
  (packages (cons* nss-certs         ;for HTTPS access
                   gvfs              ;for user mounts
                   cryptsetup
                   btrfs-progs
                   wpa-supplicant
                   network-manager
                   network-manager-applet
                   (delete sudo %base-packages)))

  (services (cons* (console-keymap-service keymap)
                   ;;(xfce-desktop-service)
                   (gnome-desktop-service)
                   (service network-manager-service-type
                            (network-manager-configuration))
                   (service wpa-supplicant-service-type wpa-supplicant)

                   ;; Desktop services follow
                   (slim-service)
                   (screen-locker-service slock)
                   ;;(screen-locker-service xlockmore "xlock")
                   (simple-service 'mtp udev-service-type (list libmtp))
                   ;;(avahi-service)    ; I don't trust this
                   ;;(wicd-service)     ; using NetworkManager instead
                   (udisks-service)
                   (upower-service)
                   (colord-service)
                   ;;(geoclue-service)  ; I don't want this
                   (polkit-service)
                   (elogind-service)
                   (dbus-service)
                   ;;(ntp-service)      ; I don't trust this

                   (modify-services (remove (lambda (svc)
                                              (eq? (service-kind svc)
                                                   wicd-service-type))
                                            %base-services)
                     ;; This is for debugging
                     #;
                     (nscd-service-type config =3D>
                                        (nscd-configuration
                                          (inherit config)
                                          (debug-level 3)
                                          (log-file "/var/log/nscd.log")))
                     ;; I don't trust the build farm
                     (guix-service-type config =3D>
                                        (guix-configuration
                                          (inherit config)
                                          (use-substitutes? #f)
                                          (authorized-keys '())
                                          (substitute-urls '())
                                          (extra-options '("--gc-keep-deriv=
ations=3Dyes"
                                                           "--gc-keep-outpu=
ts=3Dyes")))))))

  ;; Allow resolution of '.local' host names with mDNS.
  ;;(name-service-switch %mdns-host-lookup-nss)  ; disabled for now
  )
--8<---------------cut here---------------end--------------->8---

       Mark




Acknowledgement sent to Mark H Weaver <mhw@HIDDEN>:
New bug report received and forwarded. Copy sent to bug-guix@HIDDEN. Full text available.
Report forwarded to bug-guix@HIDDEN:
bug#33078; Package guix. Full text available.
Please note: This is a static page, with minimal formatting, updated once a day.
Click here to see this page with the latest information and nicer formatting.
Last modified: Wed, 7 Nov 2018 21:45:01 UTC

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997 nCipher Corporation Ltd, 1994-97 Ian Jackson.