amaharaneko/guix-mirrors
1
1
Fork 0
mirror of https://codeberg.org/guix/guix.git synced 2025-10-02 02:15:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: emacs-corfu: Generate info from README.org.

Browse source 
* gnu/packages/emacs-xyz.scm (emacs-corfu)[native-inputs]: Add texinfo.
[arguments]: Migrate to gexps, generate info from README.org.
This commit is contained in:
Andrew Tropin 2023-02-28 06:27:52 +04:00
parent ff5fbcc19b
commit 60e03bb5e7
No known key found for this signature in database
GPG key ID: 2208D20958C1DEB0
1 changed files with 21 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

31
gnu/packages/emacs-xyz.scm
View file

@ -3798,16 +3798,27 @@ of bibliographic references.")
(base32 "1xqg796844wk6kvn3xw4bqlxn9ra6jlwk7rsc5gy4j77l0gwl441")))) (base32 "1xqg796844wk6kvn3xw4bqlxn9ra6jlwk7rsc5gy4j77l0gwl441"))))
(build-system emacs-build-system) (build-system emacs-build-system)
(arguments (arguments
`(#:phases (list
(modify-phases %standard-phases #:phases
;; Move the extensions source files to the top level, which is included #~(modify-phases %standard-phases
;; in the EMACSLOADPATH. ;; Move the extensions source files to the top level, which is included
(add-after 'unpack 'move-source-files ;; in the EMACSLOADPATH.
(lambda _ (add-after 'unpack 'move-source-files
(let ((el-files (find-files "./extensions" ".*\\.el$"))) (lambda _
(for-each (lambda (f) (let ((el-files (find-files "./extensions" ".*\\.el$")))
(rename-file f (basename f))) (for-each (lambda (f)
el-files))))))) (rename-file f (basename f)))
el-files))))
(add-after 'install 'makeinfo
(lambda* (#:key outputs #:allow-other-keys)
(invoke "emacs"
"--batch"
"--eval=(require 'ox-texinfo)"
"--eval=(find-file \"README.org\")"
"--eval=(org-texinfo-export-to-info)")
(install-file "corfu.info"
(string-append #$output "/share/info")))))))
(native-inputs (list texinfo))
(propagated-inputs (propagated-inputs
(list emacs-compat)) (list emacs-compat))
(home-page "https://github.com/minad/corfu") (home-page "https://github.com/minad/corfu")