From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp10.migadu.com ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms9.migadu.com with LMTPS id kGrGDNe2GWQVcgAASxT56A (envelope-from ) for ; Tue, 21 Mar 2023 14:53:27 +0100 Received: from aspmx1.migadu.com ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp10.migadu.com with LMTPS id AOK8C9e2GWRy9QAAG6o9tA (envelope-from ) for ; Tue, 21 Mar 2023 14:53:27 +0100 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 F14DBCFFF for ; Tue, 21 Mar 2023 14:53:26 +0100 (CET) Authentication-Results: aspmx1.migadu.com; dkim=fail ("headers rsa verify failed") header.d=gmail.com header.s=20210112 header.b=e9cWV7Ck; dmarc=fail reason="SPF not aligned (relaxed)" header.from=gmail.com (policy=none); spf=pass (aspmx1.migadu.com: domain of "guix-patches-bounces+larch=yhetil.org@gnu.org" designates 209.51.188.17 as permitted sender) smtp.mailfrom="guix-patches-bounces+larch=yhetil.org@gnu.org" ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=yhetil.org; s=key1; t=1679406807; h=from:from:sender:sender:reply-to:subject:subject:date:date: message-id:message-id:to:to:cc:cc:mime-version:mime-version: content-type:content-type:resent-to:resent-from:resent-sender: resent-message-id:in-reply-to:in-reply-to:references:references: list-id:list-help:list-unsubscribe:list-subscribe:list-post: dkim-signature; bh=SJO2QElF8eKEOT63py69G9WSg9QHWvehaMfqqFOe1F8=; b=sONRawuKRBD0gnlOQmlAOcG0RPMEqaAZhZCiK4zLCHEXpIOoTrWfX+BHmxgaQr1YlyXRsa oHo7Z0LEVRWOKZ/d7NuF085N3Axg8AQz1xY5ufWC0HSjFTYHXgRbpDY4FpHl0RS2V7NzC1 rBDg52csto5UqjCPcz2nKX3+rADMoMZP5dK7L0K+V8vvaWfgUpiFmWB7l85CYVXo20r79A w0oHxqjUvOBhKP87LO3d7AH21wKp5Ri2VF9kFrgRpNRExKBEqUru0FE1dZv8VEo8+8QONM s26yeBRU0bm89p8Rt56pfE8gKkj+cOB8cR/JK+T5KLJUwJ1wzI8YbPZFkqU3LQ== ARC-Authentication-Results: i=1; aspmx1.migadu.com; dkim=fail ("headers rsa verify failed") header.d=gmail.com header.s=20210112 header.b=e9cWV7Ck; dmarc=fail reason="SPF not aligned (relaxed)" header.from=gmail.com (policy=none); spf=pass (aspmx1.migadu.com: domain of "guix-patches-bounces+larch=yhetil.org@gnu.org" designates 209.51.188.17 as permitted sender) smtp.mailfrom="guix-patches-bounces+larch=yhetil.org@gnu.org" ARC-Seal: i=1; s=key1; d=yhetil.org; t=1679406807; a=rsa-sha256; cv=none; b=VXg6GAGKXOvQqxRVWtbGeIXKLR/zbrmOvx+ZWz/EAwHqAdOGc5q2TRqfcnQCUj3G0RibKC fIvKJCpbfdwBL8ApPtPjOZ10Oe6fQUETJ2Rt88KKfbTt64DlxlqSzBzS8jaTjJaOPIng71 gkjQPyg7zKxIdp29SVKl85Ks0lMX+UJQpOl4EIzSdX4UHCxC53fi+d8+gmNN9hCl5kyDzf CF1BT7rmGvs/Q+pb6971sBrm4Vt//lluQ4o9+MMJRvfI90BaDrHG28ruEznNm7O0cbjrEH jydRJdSoVbFL0v2fs8sg4PllhY0G911o5hhdixlWuxQhKRD+JoNKUxuzq7fhwg== Received: from localhost ([::1] helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1pecQG-0000mZ-34; Tue, 21 Mar 2023 09:53:08 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1pecQA-0000m5-Mv for guix-patches@gnu.org; Tue, 21 Mar 2023 09:53:02 -0400 Received: from debbugs.gnu.org ([209.51.188.43]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1pecQA-0004AF-Ab for guix-patches@gnu.org; Tue, 21 Mar 2023 09:53:02 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1pecQA-0001ZB-4T for guix-patches@gnu.org; Tue, 21 Mar 2023 09:53:02 -0400 Subject: bug#59747: [PATCH] services: configuration: rework alist? procedure Resent-From: Maxim Cournoyer Original-Sender: "Debbugs-submit" Resent-To: guix-patches@gnu.org Resent-Date: Tue, 21 Mar 2023 13:53:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: cc-closed 59747 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: patch To: Bruno Victal Cc: 59747-done@debbugs.gnu.org Mail-Followup-To: 59747@debbugs.gnu.org, maxim.cournoyer@gmail.com, mirai@makinata.eu Received: via spool by 59747-done@debbugs.gnu.org id=D59747.16794067325953 (code D ref 59747); Tue, 21 Mar 2023 13:53:01 +0000 Received: (at 59747-done) by debbugs.gnu.org; 21 Mar 2023 13:52:12 +0000 Received: from localhost ([127.0.0.1]:57985 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1pecPM-0001Xx-7F for submit@debbugs.gnu.org; Tue, 21 Mar 2023 09:52:12 -0400 Received: from mail-qt1-f172.google.com ([209.85.160.172]:38459) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1pecPJ-0001Xk-Rd for 59747-done@debbugs.gnu.org; Tue, 21 Mar 2023 09:52:10 -0400 Received: by mail-qt1-f172.google.com with SMTP id c18so17870426qte.5 for <59747-done@debbugs.gnu.org>; Tue, 21 Mar 2023 06:52:09 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20210112; t=1679406724; h=mime-version:user-agent:message-id:in-reply-to:date:references :subject:cc:to:from:from:to:cc:subject:date:message-id:reply-to; bh=SJO2QElF8eKEOT63py69G9WSg9QHWvehaMfqqFOe1F8=; b=e9cWV7Ckw4rKVYziD5XMkUh/3D9JjGPujdhyZd7xbxsoOewOEq82jLmj7fEHl69IAA QS62Rl0NSy47g/O9aPqAEU9e2EbtJCWhZ3xUcD73I0jvBASSBiP3NSo7f9AcBVS5lMH7 m0jGf+kujI0JEsk8AcgLOCMsFQBYKse9Cnt1ykS69Zr5rlQrlg5J9qHyMpNiR7/wBkcl Z8fMQg4hXWBcvLe4YbUH5uchc0l2qjbrnAIJ9ZdLNQKluJoFJ6Ih9wGkIiFX493jDTXE beTT56w1MGBGPbL0SlV+l09tuPv2Guf5n5fIhX/FR/hRZiuO8DTr3ISSwCEIi14vQGFc CQlw== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20210112; t=1679406724; h=mime-version:user-agent:message-id:in-reply-to:date:references :subject:cc:to:from:x-gm-message-state:from:to:cc:subject:date :message-id:reply-to; bh=SJO2QElF8eKEOT63py69G9WSg9QHWvehaMfqqFOe1F8=; b=x3VwKib6vwN3rVGEGfLz/3jFCiuuuiFBRixZc5XpoCOxbdOMjsW6dQhOGph1rTvnRi VbGIjdR84oFgOWZRYRHC067b3jKPENvu8FzwY6D3uioJMWCBJOQBwQRehc7sKmmL/izs xqEubRIG3o26YrWX/Y/McxsQwjo54S02yfYpMHdNuBauqRXJHJPR4Pd/fxj7FwZJDsTS 4dVyJpAN/irbrHGcCajdyHXbjhCa1t4F1hklSwCRUl6222mzdPx4mYoTbDVD0p3piLXu WsvDydFfCvfJoG9oxlFpNlp7Ya2FDRGhLqSp7CrGdfBf8pdASN4RRiDb0/CJouAnKWxb DbYw== X-Gm-Message-State: AO0yUKWWsZBDuuwif3o7/vfXK1RVulpHBGH7R9ZRU+a8ykCGFH9zCoFV LmBUiUN4j6+Dt1PqN4t1jGZZCKzuNjwz6Q== X-Google-Smtp-Source: AK7set+GoxoszFiMeMoBJBHJQohxhzXr4RvNYzOVOIDZ/alEhYc+WdczfvuKsyygqpJi5lWc0/+9dQ== X-Received: by 2002:ac8:5c0f:0:b0:3e3:7ed6:3db with SMTP id i15-20020ac85c0f000000b003e37ed603dbmr4081284qti.29.1679406723740; Tue, 21 Mar 2023 06:52:03 -0700 (PDT) Received: from hurd (dsl-10-130-195.b2b2c.ca. [72.10.130.195]) by smtp.gmail.com with ESMTPSA id j13-20020ac8550d000000b003b82489d8acsm8416420qtq.21.2023.03.21.06.52.03 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256); Tue, 21 Mar 2023 06:52:03 -0700 (PDT) From: Maxim Cournoyer References: Date: Tue, 21 Mar 2023 09:52:02 -0400 In-Reply-To: (Bruno Victal's message of "Wed, 25 Jan 2023 16:38:51 +0000") Message-ID: <87pm92qkjh.fsf_-_@gmail.com> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/28.2 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: guix-patches@gnu.org List-Id: List-Unsubscribe: , List-Archive: List-Post: X-Migadu-Queue-Id: F14DBCFFF X-Spam-Score: -3.15 X-Migadu-Spam-Score: -3.15 X-Migadu-Scanner: scn0.migadu.com List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+larch=yhetil.org@gnu.org Sender: guix-patches-bounces+larch=yhetil.org@gnu.org X-Migadu-Country: US X-Migadu-Flow: FLOW_IN X-TUID: rXAKs/VVSEQ6 Hi, Bruno Victal writes: > * gnu/services/configuration.scm (alist?): simplify procedure. > --- > > Last patch was sent without prefix. > > gnu/services/configuration.scm | 5 +---- > 1 file changed, 1 insertion(+), 4 deletions(-) > > diff --git a/gnu/services/configuration.scm b/gnu/services/configuration.scm > index 6b0291dc00..d4d9c3b1a6 100644 > --- a/gnu/services/configuration.scm > +++ b/gnu/services/configuration.scm > @@ -437,10 +437,7 @@ (define list-of-strings? > (list-of string?)) > > (define alist? > - (match-lambda > - (() #t) > - ((head . tail) (and (pair? head) (alist? tail))) > - (_ #f))) > + (list-of pair?)) Applied, thanks! -- Thanks, Maxim