1
Fork 0
mirror of https://https.git.savannah.gnu.org/git/guix.git/ synced 2025-07-12 10:00:46 +02:00

gnu: emacs-geiser: Improve style.

* gnu/packages/emacs-xyz.scm (emacs-geiser): Improve style.
<#:phases>{lisp-directory}: Set it.
{move-source-files}: Remove.
{make-info}: Simplify.

Change-Id: Ic96dd033670e6dd4190ea39014d7810d51d6b619
Signed-off-by: Ian Eure <ian@retrospec.tv>
This commit is contained in:
Cayetano Santos 2025-07-04 16:00:43 +02:00 committed by Ian Eure
parent 7c986f2f26
commit 776fe67214
No known key found for this signature in database
GPG key ID: 8499AC88F1A71CF2

View file

@ -622,21 +622,13 @@ input via a small child-frame spawned at the position of the cursor.")
(base32 "194k1bj4ncl9w68s0dkm9ya853hxbm9lxwsckqsmaj57jz7hw46f"))))
(build-system emacs-build-system)
(arguments
'(#:phases
'(#:lisp-directory "elisp"
#:phases
(modify-phases %standard-phases
;; Move the source files to the top level, which is included in
;; the EMACSLOADPATH.
(add-after 'unpack 'move-source-files
(add-after 'unpack 'make-info
(lambda _
(let ((el-files (find-files "./elisp" ".*\\.el$")))
(for-each (lambda (f)
(rename-file f (basename f)))
el-files))))
(add-before 'install 'make-info
(lambda _
(with-directory-excursion "doc"
(invoke "makeinfo" "--no-split"
"-o" "geiser.info" "geiser.texi")))))))
(invoke "makeinfo" "--no-split"
"-o" "geiser.info" "../doc/geiser.texi"))))))
(native-inputs
(list texinfo))
(home-page "https://www.nongnu.org/geiser/")