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 WKKRLWiwrl+tOQAA0tVLHw (envelope-from ) for ; Fri, 13 Nov 2020 16:12:24 +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 oAZEKWiwrl8vBwAAB5/wlQ (envelope-from ) for ; Fri, 13 Nov 2020 16:12:24 +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 47B7C9401BD for ; Fri, 13 Nov 2020 16:12:24 +0000 (UTC) Received: from localhost ([::1]:36116 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1kdbgU-00016R-M4 for larch@yhetil.org; Fri, 13 Nov 2020 11:12:22 -0500 Received: from eggs.gnu.org ([2001:470:142:3::10]:41594) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1kdbgA-00014Z-Qs for bug-guix@gnu.org; Fri, 13 Nov 2020 11:12:02 -0500 Received: from debbugs.gnu.org ([209.51.188.43]:37638) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1kdbgA-0006HO-Gj for bug-guix@gnu.org; Fri, 13 Nov 2020 11:12:02 -0500 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1kdbgA-0005MQ-C2 for bug-guix@gnu.org; Fri, 13 Nov 2020 11:12:02 -0500 X-Loop: help-debbugs@gnu.org Subject: bug#44619: [PATCH] Expose some functions for guix.el Resent-From: John Soo Original-Sender: "Debbugs-submit" Resent-CC: bug-guix@gnu.org Resent-Date: Fri, 13 Nov 2020 16:12:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 44619 X-GNU-PR-Package: guix X-GNU-PR-Keywords: patch To: zimoun Received: via spool by 44619-submit@debbugs.gnu.org id=B44619.160528388020536 (code B ref 44619); Fri, 13 Nov 2020 16:12:02 +0000 Received: (at 44619) by debbugs.gnu.org; 13 Nov 2020 16:11:20 +0000 Received: from localhost ([127.0.0.1]:49179 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kdbfU-0005LA-4q for submit@debbugs.gnu.org; Fri, 13 Nov 2020 11:11:20 -0500 Received: from mail-pf1-f171.google.com ([209.85.210.171]:34649) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kdbfR-0005Kw-Kt for 44619@debbugs.gnu.org; Fri, 13 Nov 2020 11:11:18 -0500 Received: by mail-pf1-f171.google.com with SMTP id w6so8020019pfu.1 for <44619@debbugs.gnu.org>; Fri, 13 Nov 2020 08:11:17 -0800 (PST) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=asu-edu.20150623.gappssmtp.com; s=20150623; h=from:to:cc:subject:references:date:in-reply-to:message-id :user-agent:mime-version; bh=9PXrlMaOEmCp1rpPURtLYL+UqwBq7Byfmg6rDc96/l4=; b=fNDlBCTfz0H6yYgcztlpONGEgWgVjSBTK7LquNStCC7TqIIaEkve0h3csGNAAqfFnx vmee9A/1WqXphYt8Vxt23m9IDSWMLXfrbzMKVg6qQND+tP8sWakmT4q3I3zYI6RjCSWO vVPpiOkj/MKtZWV+7JHFUrTpM0bLY2MSk8p4bX7DgkdfPPJISlUR2Zi9IdFbcAhil84U +4JIWi4YOmYaIvpPmj4/qJV6coHpfvIGug89JqFYUuBNw+SPulWLjTy/1lzNsN+IGWox 2HGe1AUlBB3PsVrVwWqnhvku507tgNBojDi2Yc1p2Q154/UJRpFEBY0SNouUgCm+NxvR HrDw== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20161025; h=x-gm-message-state:from:to:cc:subject:references:date:in-reply-to :message-id:user-agent:mime-version; bh=9PXrlMaOEmCp1rpPURtLYL+UqwBq7Byfmg6rDc96/l4=; b=NVs+/1WFVrG1gJ8ckAtxyoTFCWXM6faRUIqh4mzKV5dOOO6peMvtTEc3N25Do7Dt93 5zN1rUsT0OArc9jxmEbi1juJ26KVzsDk9Ikz+JqfFg96MFADjW/6VnuQiszoBhH8Gi2/ GgF6TqPyBA2eJAQ3vIo0fq/pAsQ6Ib7lbRPwcw67xoQnQ8RQ7VKDZL0t5An/BV4PObRT WyU92wQMTzyLoCOI0R2fMaxA8u1beqT/XotwX6gnNwOuWc0uK6ELM1Ajc5GXvbmGISFT IdB2bN1vY/MG1+X5i/tOzIwtiLke8cDsurRJVvGKno3epgxxy263IGYkD/1q5GXNqO/H Rp/g== X-Gm-Message-State: AOAM533o+4iRYjNNElKz9+By/PPmhNuiTha+49cxDh6ak51hjMpot2iu MI0BCTpweXDZw6Mt9CkJitJ0JYbLhsKyQNGp X-Google-Smtp-Source: ABdhPJysApNRn3seWR0ZdG4dEHd+4cmO8gvhzFHKL5qRLl6kWi353fWEt8Y9GjoQNSbgB0HKGBb6jQ== X-Received: by 2002:a63:ff03:: with SMTP id k3mr2586671pgi.304.1605283866528; Fri, 13 Nov 2020 08:11:06 -0800 (PST) Received: from ecenter ([2600:1700:83b0:8bd0::7a8]) by smtp.gmail.com with ESMTPSA id 143sm8405233pfc.119.2020.11.13.08.11.05 (version=TLS1_2 cipher=ECDHE-ECDSA-CHACHA20-POLY1305 bits=256/256); Fri, 13 Nov 2020 08:11:05 -0800 (PST) From: John Soo References: <87mtzlmkfz.fsf@asu.edu> <86blg1dz9t.fsf@gmail.com> Date: Fri, 13 Nov 2020 08:11:04 -0800 In-Reply-To: <86blg1dz9t.fsf@gmail.com> (zimoun's message of "Fri, 13 Nov 2020 16:58:38 +0100") Message-ID: <87lff5xmnb.fsf@asu.edu> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/27.1 (gnu/linux) MIME-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-Spam-Score: -0.0 (/) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-Spam-Score: -1.0 (-) X-BeenThere: bug-guix@gnu.org List-Id: Bug reports for GNU Guix List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Cc: 44619@debbugs.gnu.org Errors-To: bug-guix-bounces+larch=yhetil.org@gnu.org Sender: "bug-Guix" X-Scanner: ns3122888.ip-94-23-21.eu Authentication-Results: aspmx1.migadu.com; dkim=fail (headers rsa verify failed) header.d=asu-edu.20150623.gappssmtp.com header.s=20150623 header.b=fNDlBCTf; dmarc=fail reason="SPF not aligned (relaxed)" header.from=asu.edu (policy=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-Spam-Score: 0.09 X-TUID: SP7a7gEhoM45 --=-=-= Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Hi zimoun, zimoun writes: >> diff --git a/guix/scripts/pack.scm b/guix/scripts/pack.scm >> index 8e694edbbe..b6dfcb5f6a 100644 >> --- a/guix/scripts/pack.scm >> +++ b/guix/scripts/pack.scm >> @@ -58,11 +58,14 @@ >> #:use-module (srfi srfi-37) >> #:use-module (ice-9 match) >> #:export (compressor? >> + compressor-name > > Why not also =E2=80=99compress-extension=E2=80=99 and =E2=80=99compress-c= ommand=E2=80=99? Then > will be completely exposed which seems good, isn=E2=80=99t i= t? Done, thank you! All the best to you, too, John --=-=-= Content-Type: text/x-patch Content-Disposition: attachment; filename=0001-guix-pack-Expose-some-bindings-for-third-party-use.patch >From 7f718484fe952b674c2cdaa70315d49df3c8aa57 Mon Sep 17 00:00:00 2001 From: John Soo Date: Thu, 12 Nov 2020 21:47:36 -0800 Subject: [PATCH 1/2] guix pack: Expose some bindings for third-party use. * guix/scripts/pack.scm (compressor-name, compressor-extension, compressor-command, %compressors, %formats): Expose them. fix pack.scm --- guix/scripts/pack.scm | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/guix/scripts/pack.scm b/guix/scripts/pack.scm index 8e694edbbe..a687505e0d 100644 --- a/guix/scripts/pack.scm +++ b/guix/scripts/pack.scm @@ -58,11 +58,16 @@ #:use-module (srfi srfi-37) #:use-module (ice-9 match) #:export (compressor? + compressor-name + compressor-extenstion + compressor-command + %compressors lookup-compressor self-contained-tarball docker-image squashfs-image + %formats guix-pack)) ;; Type of a compression tool. -- 2.29.1 --=-=-= Content-Type: text/x-patch Content-Disposition: attachment; filename=0002-guix-build-Expose-log-url-for-third-parties.patch >From 036dc16855c9a3f3022598c700f5e8233022aee1 Mon Sep 17 00:00:00 2001 From: John Soo Date: Thu, 12 Nov 2020 21:54:45 -0800 Subject: [PATCH 2/2] guix build: Expose log-url for third parties. * guix/scripts/build.scm (log-url): Expose it. --- guix/scripts/build.scm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/guix/scripts/build.scm b/guix/scripts/build.scm index f4a8af035b..41f21fa81d 100644 --- a/guix/scripts/build.scm +++ b/guix/scripts/build.scm @@ -57,7 +57,9 @@ #:use-module ((guix status) #:select (with-status-verbosity)) #:use-module ((guix progress) #:select (current-terminal-columns)) #:use-module ((guix build syscalls) #:select (terminal-columns)) - #:export (%standard-build-options + #:export (log-url + + %standard-build-options set-build-options-from-command-line set-build-options-from-command-line* show-build-options-help -- 2.29.1 --=-=-=--