From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp12.migadu.com ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms0.migadu.com with LMTPS id sIfcInVcQ2LifgAAgWs5BA (envelope-from ) for ; Tue, 29 Mar 2022 21:22:29 +0200 Received: from aspmx1.migadu.com ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp12.migadu.com with LMTPS id KAXCH3VcQ2LHRAEAauVa8A (envelope-from ) for ; Tue, 29 Mar 2022 21:22:29 +0200 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 2761928D4A for ; Tue, 29 Mar 2022 21:22:29 +0200 (CEST) Received: from localhost ([::1]:56520 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1nZHQC-00066K-8k for larch@yhetil.org; Tue, 29 Mar 2022 15:22:28 -0400 Received: from eggs.gnu.org ([209.51.188.92]:51324) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1nZHPn-000665-6x for guix-patches@gnu.org; Tue, 29 Mar 2022 15:22:03 -0400 Received: from debbugs.gnu.org ([209.51.188.43]:39646) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1nZHPm-0005hY-Mw for guix-patches@gnu.org; Tue, 29 Mar 2022 15:22:02 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1nZHPm-0004Lx-Cb for guix-patches@gnu.org; Tue, 29 Mar 2022 15:22:02 -0400 X-Loop: help-debbugs@gnu.org Subject: [bug#54578] [PATCH 1/2] guix: Add define-deprecated/public-alias. References: <5d9c4baf3301eee833fa575f0639760046200a6b.camel@gmail.com> In-Reply-To: <5d9c4baf3301eee833fa575f0639760046200a6b.camel@gmail.com> Resent-From: Liliana Marie Prikler Original-Sender: "Debbugs-submit" Resent-CC: guix-patches@gnu.org Resent-Date: Tue, 29 Mar 2022 19:22:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 54578 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: patch To: Ludovic =?UTF-8?Q?Court=C3=A8s?= Cc: 54578@debbugs.gnu.org Received: via spool by 54578-submit@debbugs.gnu.org id=B54578.164858168116672 (code B ref 54578); Tue, 29 Mar 2022 19:22:02 +0000 Received: (at 54578) by debbugs.gnu.org; 29 Mar 2022 19:21:21 +0000 Received: from localhost ([127.0.0.1]:33541 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1nZHP7-0004Kq-9t for submit@debbugs.gnu.org; Tue, 29 Mar 2022 15:21:21 -0400 Received: from mail-ej1-f66.google.com ([209.85.218.66]:41874) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1nZHP5-0004Kb-4k for 54578@debbugs.gnu.org; Tue, 29 Mar 2022 15:21:19 -0400 Received: by mail-ej1-f66.google.com with SMTP id a8so36992793ejc.8 for <54578@debbugs.gnu.org>; Tue, 29 Mar 2022 12:21:19 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20210112; h=from:date:subject:to:cc:content-transfer-encoding:message-id :mime-version; bh=Qe2g3CcP2ROPsnuDh65OtfxRWYDIa83vQdKCxoX8wCI=; b=h09R9SgA400/Hfzc69xIwVcpMSIw+VCPhc1+KHqMeqmqvFFDS56bjj58GchfWEhLj6 F340k4+s/khi8SbkylpPWUWCc9okTZ2868hGgkiJ/VgHsiMYw3NIQ+M02BuwXNtH4+Ji 5I7b7LP8N4ebQP/+rVWnRESYbUp/HLDTo09drU7XIyo5LCXu/NGl5XkAuQYaLTEZhH57 3LeApFg/AaRuSc+ckU0IUs56wKKX+ydc+sXiE1lmF3lym7ouTw7OacxgA9WlngW8mszK hGrKSNSGNWQ+tNB+7gjBd8HkDNPZvu1QkxW5T5DKLVHRUuQg87+JsygY8IIiIMThXD0i gHCg== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20210112; h=x-gm-message-state:from:date:subject:to:cc :content-transfer-encoding:message-id:mime-version; bh=Qe2g3CcP2ROPsnuDh65OtfxRWYDIa83vQdKCxoX8wCI=; b=vtfu91hV2Vq9Ga+NySDSpaF9xxwvaTpNKnPN2FthzmNiSG3P9qGPZACgZrOSvwiroE YM9LEPv3bLaxS+ad0OhRWh4qmRMmkcgCkqqTjL9eftBKkUhboYNH/m07N0+x7jsfczRU haQnspsm3ZC08MvTQvYVj1x0PmicJUPpeIK4INEUVpeuTqx1TjW1AIspfS2gAwUD7a4a lYZ0LgirO59numpX8B0doDhPFoXg55yuBmHNqvEVaYeoRddqLzmLrrcJmutDPr2vkOVb xiGT29VuoXA2t5VlhB8fZdlyBXNmvIsBeHKByOpW5QcvYTUlBS/eMSZcRbPea63a5+sQ x1VQ== X-Gm-Message-State: AOAM532zhapt7j1GvJEsenjMasthddhDOkQ4SCHbPCwfoUpQeVNTKXnc p5YZIQs0G1gkPxbt9VJNd1+zuhuT810= X-Google-Smtp-Source: ABdhPJwPSixuA7uS3CK7z84vJgfZVJGdwySk/94UJlFPomDfuzIJSMxZHO8r7D3Cvu/aQQLKXdderA== X-Received: by 2002:a17:907:6d0e:b0:6d7:c85:5bf5 with SMTP id sa14-20020a1709076d0e00b006d70c855bf5mr37149332ejc.31.1648581673170; Tue, 29 Mar 2022 12:21:13 -0700 (PDT) Received: from nijino.fritz.box (85-127-52-93.dsl.dynamic.surfer.at. [85.127.52.93]) by smtp.gmail.com with ESMTPSA id i11-20020a05640242cb00b0041922d3ce3bsm9031973edc.26.2022.03.29.12.21.12 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256); Tue, 29 Mar 2022 12:21:12 -0700 (PDT) From: Liliana Marie Prikler Date: Tue, 29 Mar 2022 21:16:35 +0200 Content-Transfer-Encoding: 7bit Message-ID: <06c24c012347d2148f26a79e71213e7edb122f42.camel@gmail.com> MIME-Version: 1.0 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: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+larch=yhetil.org@gnu.org Sender: "Guix-patches" X-Migadu-Flow: FLOW_IN X-Migadu-To: larch@yhetil.org X-Migadu-Country: US ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=yhetil.org; s=key1; t=1648581749; h=from:from:sender:sender:reply-to:subject:subject:date:date: message-id:message-id:to:to:cc:cc:mime-version:mime-version: content-transfer-encoding:content-transfer-encoding:resent-cc: 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=Qe2g3CcP2ROPsnuDh65OtfxRWYDIa83vQdKCxoX8wCI=; b=oX5wGOhl4+dNGwtDgcUCqNC9fw7BDnK0Iicu7PzgX7MHaMYqXWGTbsJCKxHAJjKZf1uoHm tSCx+Oqp1vVRVX5DuykHTgHWBi5jVcKdEu6xPv7kLS0JwhVtrkrVxI45sQj/aah8OEsMra 5HRlp3tXPx77DVJwUYsRnFeZ1t0fPlqwX+5vdlz0Sgi4EcRXVfPCxv2n8aRWqlCK/pw1s/ o16XVHCR7TkujyUkB+O6AL4XO9WiWGcc6Q6KuRFBvt/jCcq2rGtpA2ZVDxMpDUWFstP9yx 7THBbgIfOTm1iNM0HuKaCeYYGuaXxAe8bLwKRZe5mjCSCxSVo6Vf18ND163mEg== ARC-Seal: i=1; s=key1; d=yhetil.org; t=1648581749; a=rsa-sha256; cv=none; b=Mz0hq8CtpQAxW8MJUxF+9YQhhPnDt2nXYpDwiwhhEAKPZc0NfKEdPWVwrfBRRR0U8LfPB2 FmfvG5rYHJklSR2OwBHEDGeOmnwe6Kop8uzkxbLf8i5nsnAOEhe45M23Kl2t6cTN82jSu9 quOXw/OPnoZWRs2qPWSMiMGZLuE0vZX1Xx8SoKFF3vV+dYoR0H687dX/SPeaviGHy/vWmq nK6md2m2mAWKiU1iB8Jw8HWasLb5seC2N1oFZU7DMucPs8CMjCOgZFkJTUHRiz2WuIBAN4 YUo3JEjGNtS7W/qJ1/FCZSjL0krz6GL9j7ZwkiQJDeCz/JR5+OqGHxQznLlrcw== ARC-Authentication-Results: i=1; aspmx1.migadu.com; dkim=fail ("headers rsa verify failed") header.d=gmail.com header.s=20210112 header.b=h09R9SgA; 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" X-Migadu-Spam-Score: 5.93 Authentication-Results: aspmx1.migadu.com; dkim=fail ("headers rsa verify failed") header.d=gmail.com header.s=20210112 header.b=h09R9SgA; 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" X-Migadu-Queue-Id: 2761928D4A X-Spam-Score: 5.93 X-Migadu-Scanner: scn1.migadu.com X-TUID: /raoQDJJntV0 * guix/deprecation.scm (define-deprecated/public-alias): New variable. --- guix/deprecation.scm | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/guix/deprecation.scm b/guix/deprecation.scm index 09a27789c9..8147a01e24 100644 --- a/guix/deprecation.scm +++ b/guix/deprecation.scm @@ -25,6 +25,7 @@ (define-module (guix deprecation) define-deprecated/public define-deprecated/alias + define-deprecated/public-alias warn-about-old-daemon warn-about-deprecation)) @@ -124,3 +125,10 @@ (define-syntax deprecated (id (identifier? #'id) #'replacement))))) + +(define-syntax-rule (define-deprecated/public-alias deprecated replacement) + "Like define-deprecated/alias, but exporting DEPRECATED. +It is assumed, that REPLACEMENT is already public." + (begin + (define-deprecated/alias deprecated replacement) + (export deprecated))) -- 2.34.0