[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
02/02: gnu: roffit: Adjust install phase.
From: |
guix-commits |
Subject: |
02/02: gnu: roffit: Adjust install phase. |
Date: |
Tue, 15 Sep 2020 02:46:16 -0400 (EDT) |
efraim pushed a commit to branch master
in repository guix.
commit af4c633bbb96e6c5311248970efbab5f98790900
Author: Efraim Flashner <efraim@flashner.co.il>
AuthorDate: Tue Sep 15 09:41:37 2020 +0300
gnu: roffit: Adjust install phase.
* gnu/packages/groff.scm (roffit)[arguments]: Remove make-flags. Remove
custom 'pre-install phase. Replace 'install phase to also install
manpage.
---
gnu/packages/groff.scm | 12 +++++-------
1 file changed, 5 insertions(+), 7 deletions(-)
diff --git a/gnu/packages/groff.scm b/gnu/packages/groff.scm
index 0daf614..0803a2a 100644
--- a/gnu/packages/groff.scm
+++ b/gnu/packages/groff.scm
@@ -191,17 +191,15 @@ is usually the formatter of \"man\" documentation pages.")
(build-system gnu-build-system)
(arguments
`(#:test-target "test"
- #:make-flags
- (list (string-append "INSTALLDIR="
- (assoc-ref %outputs "out") "/bin"))
#:phases
(modify-phases %standard-phases
(delete 'configure)
- (add-before 'install 'pre-install
+ (replace 'install
(lambda* (#:key outputs #:allow-other-keys)
- (mkdir-p (string-append (assoc-ref outputs "out")
- "/bin"))
- #t))
+ (let ((out (assoc-ref outputs "out")))
+ (install-file "roffit" (string-append out "/bin"))
+ (install-file "roffit.1" (string-append out
"/share/man/man1"))
+ #t)))
(add-after 'install 'wrap-program
(lambda* (#:key outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out")))