Archived
1
0
Fork 0

gnu: emacs-geiser-guile: Use G-expressions.

* gnu/packages/emacs-xyz.scm (emacs-geiser-guile)[arguments]<#:include,
This commit is contained in:
Nicolas Goaziou 2022-01-17 10:47:15 +01:00
parent 87ad668a51
commit 0dbfc16ee2
No known key found for this signature in database
GPG key ID: DA00B4F048E92F2D

View file

@ -299,13 +299,13 @@ e.g. emacs-geiser-guile for Guile.")
(base32 "0fk5rr7mjmb4waiagi80dhddas5mrsgqr0flag5v5b0piblixxq6")))) (base32 "0fk5rr7mjmb4waiagi80dhddas5mrsgqr0flag5v5b0piblixxq6"))))
(build-system emacs-build-system) (build-system emacs-build-system)
(arguments (arguments
'(#:include (cons "^src/" %default-include) (list
#:include #~(cons "^src/" %default-include)
#:phases #:phases
(modify-phases %standard-phases #~(modify-phases %standard-phases
(add-after 'make-autoloads 'patch-autoloads (add-after 'make-autoloads 'patch-autoloads
(lambda* (#:key outputs #:allow-other-keys) (lambda _
(substitute* (string-append (substitute* (string-append (elpa-directory #$output)
(elpa-directory (assoc-ref outputs "out"))
"/geiser-guile-autoloads.el") "/geiser-guile-autoloads.el")
;; Activating implementations fails when Geiser is not yet ;; Activating implementations fails when Geiser is not yet
;; loaded, so let's defer that until it is. ;; loaded, so let's defer that until it is.