[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[bug#49819] [PATCH] gnu: Add emacs-geiser-chez.
From: |
Xinglu Chen |
Subject: |
[bug#49819] [PATCH] gnu: Add emacs-geiser-chez. |
Date: |
Wed, 04 Aug 2021 10:14:34 +0200 |
On Tue, Aug 03 2021, Maxim Cournoyer wrote:
> Hello,
>
> Xinglu Chen <public@yoctocell.xyz> writes:
>
>> * gnu/packages/emacs-xyz.scm (emacs-geiser-chez): New variable.
>> ---
>> gnu/packages/emacs-xyz.scm | 43 ++++++++++++++++++++++++++++++++++++++
>> 1 file changed, 43 insertions(+)
>>
>> diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
>> index e3b94228e1..bbda1db614 100644
>> --- a/gnu/packages/emacs-xyz.scm
>> +++ b/gnu/packages/emacs-xyz.scm
>> @@ -138,6 +138,7 @@
>> #:use-module (gnu packages aspell)
>> #:use-module (gnu packages audio)
>> #:use-module (gnu packages bash)
>> + #:use-module (gnu packages chez)
>> #:use-module (gnu packages cmake)
>> #:use-module (gnu packages code)
>> #:use-module (gnu packages cpp)
>> @@ -408,6 +409,48 @@ a generic Scheme interaction mode for the GNU Emacs
>> editor.")
>> a generic Scheme interaction mode for the GNU Emacs editor.")
>> (license license:bsd-3)))
>>
>> +(define-public emacs-geiser-chez
>> + (package
>> + (name "emacs-geiser-chez")
>> + (version "0.16")
>> + (source
>> + (origin
>> + (method git-fetch)
>> + (uri (git-reference
>> + (url "https://gitlab.com/emacs-geiser/chez")
>> + (commit version)))
>> + (file-name (git-file-name name version))
>> + (sha256
>> + (base32
>> + "0cc1z5z5cpvxa5f3n8kvms0wxlybzcg4l1bh3rwv1l1sb0lk1xzx"))))
>> + (build-system emacs-build-system)
>> + (arguments
>> + '(#:include (cons "^src/" %default-include)
>> + #:phases
>> + (modify-phases %standard-phases
>> + (add-after 'make-autoloads 'patch-autoloads
>> + (lambda* (#:key outputs #:allow-other-keys)
>> + (substitute* (string-append
>> + (elpa-directory (assoc-ref outputs "out"))
>> + "/geiser-chez-autoloads.el")
>> + ;; Activating implementations fails when Geiser is not yet
>> + ;; loaded, so let's defer that until it is.
>> + (("\\(geiser-activate-implementation .*\\)" all)
>> + (string-append
>> + "(eval-after-load 'geiser-impl '" all ")"))
>> + (("\\(geiser-implementation-extension .*\\)" all)
>> + (string-append
>> + "(eval-after-load 'geiser-impl '" all ")"))))))))
>
> Could you please report the above issue to upstream so that it can
> properly be fixed? And then add a reference to it in a comment in the
> above package definition.
Reported upstream; I will send a v2. :)
<https://gitlab.com/emacs-geiser/chez/-/issues/7>
signature.asc
Description: PGP signature