From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp1 ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms11 with LMTPS id J6FEAvHlnF9zEwAA0tVLHw (envelope-from ) for ; Sat, 31 Oct 2020 04:20:01 +0000 Received: from aspmx1.migadu.com ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp1 with LMTPS id AHw2OfDlnF8FMQAAbx9fmQ (envelope-from ) for ; Sat, 31 Oct 2020 04:20:00 +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 C426D9402AF for ; Sat, 31 Oct 2020 04:20:00 +0000 (UTC) Received: from localhost ([::1]:49074 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1kYiMx-0003NB-Ki for larch@yhetil.org; Sat, 31 Oct 2020 00:19:59 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:35782) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1kYiMf-0003Mx-A2 for guix-devel@gnu.org; Sat, 31 Oct 2020 00:19:43 -0400 Received: from mail-io1-xd42.google.com ([2607:f8b0:4864:20::d42]:41214) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1kYiMb-0002lc-7p for guix-devel@gnu.org; Sat, 31 Oct 2020 00:19:39 -0400 Received: by mail-io1-xd42.google.com with SMTP id u62so9597102iod.8 for ; Fri, 30 Oct 2020 21:19:36 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20161025; h=from:to:cc:subject:references:date:in-reply-to:message-id :user-agent:mime-version; bh=1HIX6rHPQ4VFSsmEeEL/kgtMl8PyYCsWK51WH60hcUE=; b=RdQ+rQhmSPirqUAHjwwGZWO92x0naO0uD+O1bSH3Uz8/V1vW1nyBEKsy+MyzsvDs+M 8k5OxbtI2yQBFgdLbXN0sEsOZBS9mgZxn4WO86sgyvAUbEAG4EFVxsImoOkleGv0arBG mww8bQrVw+S9Cy64pYurtPbW2qj8SyEpyWnWqTtW2BUTCx4fWtMvxgt/vyf7xfTn7atF 1mP6SCQBBvy4CBuQE+zLNvO5RMadm3GARjdJAYuzww5FfzBrI8jwPXbb1+5H1Q/SyM5C mupSFbAtv4JR/VkibHmd+lUcTnpOjHRRI4i2aszkpsyZyNXhFbC9VKdb+L09SEgT0pIz bVJQ== 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=1HIX6rHPQ4VFSsmEeEL/kgtMl8PyYCsWK51WH60hcUE=; b=pY6+h/1sBGHL3pWR7Hvn+9DDl2icBQwUQceY+KzlT2vLvX+XDcSKQWIIupcmIo7psH /7YmoKXVkQ8MYkW/n5ES6An2WowlI32kcTbEUKXYWETf6xpgcIKZo4FlAH7tGpP5XGvZ 6xW/PuHz9eEToCg82NKPv5gJRAEl4Lf0Rg9Gsl4dtW795ApyfLRV68gV50vWlO9GO+VM wZGcUeMuFOLqsy9ZwpKdKBBNDsXT4whw7LjrBu8j7Ls6j5hOmGV8a2KwNph9ryLbGmDc bKdJiyZ1n5C/jbzjZqxeo87uFpevwOhTyEoLJ+IKl+htm+jn2kQXGLL0bxZuiJETt42p ySkg== X-Gm-Message-State: AOAM531ZaL24dGZljFFbusfzODBe7Zx/u/QNNrAkdI4FdZlYn1j01Wkl W4Yl9SOEKvusovtzZwexsLw= X-Google-Smtp-Source: ABdhPJwXgQf9S5k3lmW0xdsLIo1NHwiChJH8iSCxfmUTDOQ7Wd+GvpsumqkBzmOZSooVke8pheinsw== X-Received: by 2002:a05:6638:22c2:: with SMTP id j2mr4454442jat.25.1604117975325; Fri, 30 Oct 2020 21:19:35 -0700 (PDT) Received: from hurd (dsl-236-123-160.b2b2c.ca. [207.236.123.160]) by smtp.gmail.com with ESMTPSA id n28sm7080297ila.52.2020.10.30.21.19.34 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256); Fri, 30 Oct 2020 21:19:34 -0700 (PDT) From: Maxim Cournoyer To: guix-devel@gnu.org Subject: Re: [PATCH v3] .dir-locals.el: Automatically set the GEISER-GUILE-LOAD-PATH variable. References: <877drdp68p.fsf@gmail.com> <20201027174425.15095-1-maxim.cournoyer@gmail.com> Date: Sat, 31 Oct 2020 00:19:33 -0400 In-Reply-To: <20201027174425.15095-1-maxim.cournoyer@gmail.com> (Maxim Cournoyer's message of "Tue, 27 Oct 2020 13:44:25 -0400") Message-ID: <87361vyqlm.fsf@gmail.com> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/27.1 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain Received-SPF: pass client-ip=2607:f8b0:4864:20::d42; envelope-from=maxim.cournoyer@gmail.com; helo=mail-io1-xd42.google.com X-detected-operating-system: by eggs.gnu.org: No matching host in p0f cache. That's all we know. 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, FREEMAIL_FROM=0.001, RCVD_IN_DNSWL_NONE=-0.0001, SPF_HELO_NONE=0.001, SPF_PASS=-0.001 autolearn=ham autolearn_force=no X-Spam_action: no action X-BeenThere: guix-devel@gnu.org X-Mailman-Version: 2.1.23 Precedence: list List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-devel-bounces+larch=yhetil.org@gnu.org Sender: "Guix-devel" X-Scanner: ns3122888.ip-94-23-21.eu Authentication-Results: aspmx1.migadu.com; dkim=fail (headers rsa verify failed) header.d=gmail.com header.s=20161025 header.b=RdQ+rQhm; dmarc=fail reason="SPF not aligned (relaxed)" header.from=gmail.com (policy=none); spf=pass (aspmx1.migadu.com: domain of guix-devel-bounces@gnu.org designates 209.51.188.17 as permitted sender) smtp.mailfrom=guix-devel-bounces@gnu.org X-Spam-Score: 0.09 X-TUID: GV+AcxK07jQD Hello, Maxim Cournoyer writes: > * .dir-locals.el: Set the GUIX-DIRECTORY and GEISER-GUILE-LOAD-PATH Emacs > variables based on the location of the .dir-locals file. > --- > .dir-locals.el | 21 ++++++++++++++++++++- > 1 file changed, 20 insertions(+), 1 deletion(-) > > diff --git a/.dir-locals.el b/.dir-locals.el > index 19f15b3e1a..0496e41ca2 100644 > --- a/.dir-locals.el > +++ b/.dir-locals.el > @@ -8,7 +8,26 @@ > ;; For use with 'bug-reference-prog-mode'. > (bug-reference-url-format . "http://bugs.gnu.org/%s") > (bug-reference-bug-regexp > - . ""))) > + . "") > + > + ;; Emacs-Guix > + (eval . (setq guix-directory > + (locate-dominating-file default-directory ".dir-locals.el"))) > + > + ;; Geiser > + ;; This allows automatically setting the `geiser-guile-load-path' > + ;; variable when using various Guix checkouts (e.g., via git worktrees). > + (eval . (let* ((root-dir (expand-file-name > + (locate-dominating-file > + default-directory ".dir-locals.el"))) > + ;; Workaround for bug https://issues.guix.gnu.org/43818. > + (root-dir* (directory-file-name root-dir))) > + (unless (boundp 'geiser-guile-load-path) > + (defvar geiser-guile-load-path '())) > + (make-local-variable 'geiser-guile-load-path) > + (cl-pushnew root-dir* geiser-guile-load-path > + :test #'string-equal))))) > + > (c-mode . ((c-file-style . "gnu"))) > (scheme-mode > . Pushed to master as 0e1b0958bd. Thank you! Maxim