ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-11 13:49:23 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: cedille: Install the info pages.

Browse source 
* gnu/packages/cedille.scm (cedille)[arguments]: Rename phase
'patch-cedille-path-el' to 'patch-cedille-paths' and add substitution for the
info page location.   In the 'copy-cedille-mode' phase, install the info page.

Signed-off-by: Marius Bakke <mbakke@fastmail.com>
This commit is contained in:
John Soo 2020-03-28 10:30:48 -07:00 committed by Marius Bakke
parent a8f1b52017
commit be41d7d91d
No known key found for this signature in database
GPG key ID: A2A06DF2A33A54FA
1 changed files with 8 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
gnu/packages/cedille.scm
View file

@ -51,15 +51,19 @@ (define-public cedille
(arguments (arguments
`(#:phases `(#:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(add-after 'unpack 'patch-cedille-path-el (add-after 'unpack 'patch-cedille-paths
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out"))) (let ((out (assoc-ref outputs "out")))
(substitute* "cedille-mode.el" (substitute* "cedille-mode.el"
(("/usr/share/emacs/site-lisp/cedille-mode") (("/usr/share/emacs/site-lisp/cedille-mode")
(string-append (string-append
out "/share/emacs/site-lisp/cedille"))) out "/share/emacs/site-lisp/cedille")))
(substitute* "cedille-mode/cedille-mode-info.el"
(("\\(concat cedille-path-el \"cedille-info-main.info\"\\)")
(string-append
"\"" out "/share/info/cedille-info-main.info.gz\"")))
#t))) #t)))
(add-after 'unpack 'copy-cedille-mode (add-after 'patch-cedille-paths 'copy-cedille-mode
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out")) (let* ((out (assoc-ref outputs "out"))
(lisp (lisp
@ -107,6 +111,8 @@ (define-public cedille
(install-file "cedille" (string-append out "/bin")) (install-file "cedille" (string-append out "/bin"))
(install-file "core/cedille-core" (install-file "core/cedille-core"
(string-append out "/bin")) (string-append out "/bin"))
(install-file "docs/info/cedille-info-main.info"
(string-append out "/share/info"))
#t)))))) #t))))))
(home-page "https://cedille.github.io/") (home-page "https://cedille.github.io/")
(synopsis (synopsis