From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp2 ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms11 with LMTPS id KNbjLCG0uV4yGQAA0tVLHw (envelope-from ) for ; Mon, 11 May 2020 20:22:57 +0000 Received: from aspmx1.migadu.com ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp2 with LMTPS id GGHYMC+0uV4TFgAAB5/wlQ (envelope-from ) for ; Mon, 11 May 2020 20:23:11 +0000 Received: from lists.gnu.org (lists.gnu.org [209.51.188.17]) (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits)) (No client certificate requested) by aspmx1.migadu.com (Postfix) with ESMTPS id 6DA8B940DEA for ; Mon, 11 May 2020 20:23:09 +0000 (UTC) Received: from localhost ([::1]:32994 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1jYExB-0006Jl-FH for larch@yhetil.org; Mon, 11 May 2020 16:23:09 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:60772) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1jYEx3-0006JB-VZ for bug-guix@gnu.org; Mon, 11 May 2020 16:23:01 -0400 Received: from debbugs.gnu.org ([209.51.188.43]:41880) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1jYEx3-0006RJ-M8 for bug-guix@gnu.org; Mon, 11 May 2020 16:23:01 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1jYEx3-00007i-IK for bug-guix@gnu.org; Mon, 11 May 2020 16:23:01 -0400 X-Loop: help-debbugs@gnu.org Subject: bug#41140: =?UTF-8?Q?=E2=80=9Cguix_?= =?UTF-8?Q?system=E2=80=9D?= suggests wrong module import when using =?UTF-8?Q?=E2=80=9Cremove=E2=80=9D?= Resent-From: Ludovic =?UTF-8?Q?Court=C3=A8s?= Original-Sender: "Debbugs-submit" Resent-CC: bug-guix@gnu.org Resent-Date: Mon, 11 May 2020 20:23:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 41140 X-GNU-PR-Package: guix X-GNU-PR-Keywords: To: Ricardo Wurmus Received: via spool by 41140-submit@debbugs.gnu.org id=B41140.1589228565450 (code B ref 41140); Mon, 11 May 2020 20:23:01 +0000 Received: (at 41140) by debbugs.gnu.org; 11 May 2020 20:22:45 +0000 Received: from localhost ([127.0.0.1]:53426 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1jYEwn-00007B-5s for submit@debbugs.gnu.org; Mon, 11 May 2020 16:22:45 -0400 Received: from eggs.gnu.org ([209.51.188.92]:57734) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1jYEwl-00006z-HU for 41140@debbugs.gnu.org; Mon, 11 May 2020 16:22:43 -0400 Received: from fencepost.gnu.org ([2001:470:142:3::e]:46583) by eggs.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1jYEwg-0006FA-3k; Mon, 11 May 2020 16:22:38 -0400 Received: from [2a01:e0a:1d:7270:af76:b9b:ca24:c465] (port=39052 helo=ribbon) by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256) (Exim 4.82) (envelope-from ) id 1jYEwf-00027F-L9; Mon, 11 May 2020 16:22:37 -0400 From: Ludovic =?UTF-8?Q?Court=C3=A8s?= References: <87lfm22il6.fsf@elephly.net> <877dxj327c.fsf@elephly.net> Date: Mon, 11 May 2020 22:22:36 +0200 In-Reply-To: <877dxj327c.fsf@elephly.net> (Ricardo Wurmus's message of "Sun, 10 May 2020 23:33:11 +0200") Message-ID: <87lflyfchf.fsf@gnu.org> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/26.3 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable X-Spam-Score: -2.3 (--) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-Spam-Score: -3.3 (---) X-BeenThere: bug-guix@gnu.org List-Id: Bug reports for GNU Guix List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Cc: 41140@debbugs.gnu.org Errors-To: bug-guix-bounces+larch=yhetil.org@gnu.org Sender: "bug-Guix" X-Scanner: scn0 X-Spam-Score: -1.01 Authentication-Results: aspmx1.migadu.com; dkim=none; dmarc=none; spf=pass (aspmx1.migadu.com: domain of bug-guix-bounces@gnu.org designates 209.51.188.17 as permitted sender) smtp.mailfrom=bug-guix-bounces@gnu.org X-Scan-Result: default: False [-1.01 / 13.00]; RCVD_VIA_SMTP_AUTH(0.00)[]; GENERIC_REPUTATION(0.00)[-0.54005779508046]; TO_DN_SOME(0.00)[]; R_SPF_ALLOW(-0.20)[+ip4:209.51.188.0/24:c]; IP_REPUTATION_HAM(0.00)[asn: 22989(0.07), country: US(-0.00), ip: 209.51.188.17(-0.54)]; DWL_DNSWL_FAIL(0.00)[209.51.188.17:server fail]; MX_GOOD(-0.50)[cached: eggs.gnu.org]; RCPT_COUNT_TWO(0.00)[2]; MAILLIST(-0.20)[mailman]; FORGED_RECIPIENTS_MAILLIST(0.00)[]; RCVD_TLS_LAST(0.00)[]; R_DKIM_NA(0.00)[]; ASN(0.00)[asn:22989, ipnet:209.51.188.0/24, country:US]; MID_RHS_MATCH_FROM(0.00)[]; TAGGED_FROM(0.00)[larch=yhetil.org]; ARC_NA(0.00)[]; FROM_NEQ_ENVFROM(0.00)[ludo@gnu.org,bug-guix-bounces@gnu.org]; FROM_HAS_DN(0.00)[]; URIBL_BLOCKED(0.00)[elephly.net:email]; MIME_GOOD(-0.10)[text/plain]; MIME_TRACE(0.00)[0:+]; DMARC_NA(0.00)[gnu.org]; HAS_LIST_UNSUB(-0.01)[]; DNSWL_BLOCKED(0.00)[209.51.188.17:from]; RWL_MAILSPIKE_POSSIBLE(0.00)[209.51.188.17:from]; RCVD_COUNT_SEVEN(0.00)[9]; FORGED_SENDER_MAILLIST(0.00)[] X-TUID: rEepWnPI/Guk Hi, Ricardo Wurmus skribis: >>>From 40c1208cbe9cbfa58ee385ef6ee06b775d309753 Mon Sep 17 00:00:00 2001 > From: Ricardo Wurmus > Date: Sun, 10 May 2020 23:29:38 +0200 > Subject: [PATCH] services: Support DELETE in MODIFY-SERVICES macro. > > * gnu/services.scm (%modify-service): Add clause for DELETE syntax. > (modify-services): Use FILTER-MAP; adjust docstring. > * doc/guix.texi (System Services): Mention alternative syntax. > (X Window): Use MODIFY-SERVICES syntax. I like it! > - #:use-module (srfi srfi-1) > + #:use-module ((srfi srfi-1) #:hide (delete)) > #:use-module (srfi srfi-9) > #:use-module (srfi srfi-9 gnu) > #:use-module (srfi srfi-26) > @@ -272,7 +273,11 @@ singleton service type NAME, of which the returned s= ervice is an instance." > (service type value))) >=20=20 > (define-syntax %modify-service > - (syntax-rules (=3D>) > + (syntax-rules (=3D> delete) > + ((_ svc (delete kind) clauses ...) > + (if (eq? (service-kind svc) kind) > + #f > + (%modify-service svc clauses ...))) Best practice suggests that =E2=80=98delete=E2=80=99 should be bound (info = "(guile) Syntax Rules"): --8<---------------cut here---------------start------------->8--- Although literals can be unbound, usually they are bound to allow them to be imported, exported, and renamed. *Note Modules::, for more information on imports and exports. In Guile there are a few standard auxiliary syntax definitions, as specified by R6RS and R7RS: --8<---------------cut here---------------end--------------->8--- Now, if we export a new =E2=80=98delete=E2=80=99 binding from here, it=E2= =80=99ll annoy everyone. So perhaps we can keep the srfi-1 =E2=80=98delete=E2=80=99 and r= e-export it, as done in (guix build utils)=E2=80=A6 though that situation is also annoyi= ng because we get warnings saying that it collides with core =E2=80=98delete= =E2=80=99. Dunno, give it a try! Ludo=E2=80=99.