From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp2 ([2001:41d0:2:bcc0::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms11 with LMTPS id pImeA1ZJRWDzWAAA0tVLHw (envelope-from ) for ; Sun, 07 Mar 2021 21:44:54 +0000 Received: from aspmx1.migadu.com ([2001:41d0:2:bcc0::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp2 with LMTPS id yAKgOlVJRWAHGQAAB5/wlQ (envelope-from ) for ; Sun, 07 Mar 2021 21:44:53 +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 C6BFC25451 for ; Sun, 7 Mar 2021 22:44:53 +0100 (CET) Received: from localhost ([::1]:46296 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1lJ1Cm-0007eb-MR for larch@yhetil.org; Sun, 07 Mar 2021 16:44:52 -0500 Received: from eggs.gnu.org ([2001:470:142:3::10]:40686) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1lJ1Cd-0007eS-UP for help-guix@gnu.org; Sun, 07 Mar 2021 16:44:43 -0500 Received: from lepiller.eu ([2a00:5884:8208::1]:34328) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1lJ1Ca-0003fq-Ud for help-guix@gnu.org; Sun, 07 Mar 2021 16:44:43 -0500 Received: from lepiller.eu (localhost [127.0.0.1]) by lepiller.eu (OpenSMTPD) with ESMTP id 8583904d; Sun, 7 Mar 2021 21:44:36 +0000 (UTC) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed; d=lepiller.eu; h=date :in-reply-to:references:mime-version:content-type :content-transfer-encoding:subject:to:from:message-id; s=dkim; bh=vwdfz80z+SsKgnfARqGR/7wa6ti4ZMwBm+14FKpRnj8=; b=HgtRoig/VGmN VIPAzo8DKVURQyfWiyYg2Hoz4ol20nHPDozXmD8B/QazGnTO77Sc6qW+LcG+lkfV zgTTinqBiwediGtN8kfsezGpFCjsbvDcMpwLg5BxYoG/DXuM9rJeVOe99Wawddg3 IGegCHwmDRl/jnury3+S01omVt+4IXAUL0HpMLbmhWRo/FvG/DcHO7qr2Ad5HMoa iZfgwlp1KtaN9/eR45mePE/zhlvo99mTpxVhuWj97I+pMZRV5OxGavhD6/wB9B7k tLyuZ3+R4hgcieUk0TN6Za0RgkAZQFUaGipEDc6y66WPq9OTmZOqiFsBIJseIoTH 1Dc5iL4rsQ== Received: by lepiller.eu (OpenSMTPD) with ESMTPSA id 0a72ddb0 (TLSv1.2:ECDHE-RSA-AES256-GCM-SHA384:256:NO); Sun, 7 Mar 2021 21:44:35 +0000 (UTC) Date: Sun, 07 Mar 2021 16:44:23 -0500 User-Agent: K-9 Mail for Android In-Reply-To: <21a857a8-18aa-2102-04ab-561d5de68b7b@raghavgururajan.name> References: <21a857a8-18aa-2102-04ab-561d5de68b7b@raghavgururajan.name> MIME-Version: 1.0 Subject: Re: Custom 'install phase To: help-guix@gnu.org,Raghav Gururajan From: Julien Lepiller Message-ID: Received-SPF: pass client-ip=2a00:5884:8208::1; envelope-from=julien@lepiller.eu; helo=lepiller.eu X-Spam_score_int: -20 X-Spam_score: -2.1 X-Spam_bar: -- X-Spam_report: (-2.1 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1, DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1, HTML_MESSAGE=0.001, SPF_HELO_PASS=-0.001, SPF_PASS=-0.001 autolearn=ham autolearn_force=no X-Spam_action: no action Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable X-Content-Filtered-By: Mailman/MimeDel 2.1.23 X-BeenThere: help-guix@gnu.org X-Mailman-Version: 2.1.23 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: help-guix-bounces+larch=yhetil.org@gnu.org Sender: "Help-Guix" X-Migadu-Flow: FLOW_IN X-Migadu-Spam-Score: -4.00 Authentication-Results: aspmx1.migadu.com; none X-Migadu-Queue-Id: C6BFC25451 X-Spam-Score: -4.00 X-Migadu-Scanner: scn1.migadu.com X-TUID: kMWk7FpMzwLT I think you need to remove the apply, but keep one level of parenthesis, li= ke so: ((assoc-ref =E2=80=A6) args =E2=80=A6) Apply takes the last arguments, which must be a list and appends all its e= lements to the invocation=2E Like (apply foo '(1 2 3 4)) is tge same as (fo= o 1 2 3 4)=2E Here you're probably confused because of the assoc-ref is not= a procodure, but it's fine: it returns a procedure, so guile can execute i= t and pass arguments to it the normal way=2E Le 7 mars 2021 14:06:37 GMT-05:00, Raghav Gururajan a =C3=A9crit : >Hello Guix! > >I am trying to re-write the custom 'install phase of this=20 >(https://paste=2Edebian=2Enet/1188301/) package definition,as follows: > >``` > (replace 'install > (lambda _ > (for-each (lambda (solution) > (with-directory-excursion solution > (apply (assoc-ref copy:%standard-phases=20 >'install) > #:install-plan > '(("src" (string-append=20 >"include/" solution) > #:include-regexp ("\\=2Eh$")))))) > (list > "qtlockedfile" > "qtpropertybrowser" > "qtservice" > "qtsingleapplication" > "qtsoap")) > #t)) >``` > >I get an error In procedure apply: Apply to non-list: "src"=2E > >Can anyone help me with the correct snippet please? > >Regards, >RG=2E