mirror of
https://https.git.savannah.gnu.org/git/guix.git/
synced 2025-07-12 18:10:47 +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:
parent
7c986f2f26
commit
776fe67214
1 changed files with 5 additions and 13 deletions
|
@ -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/")
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue