[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
03/04: gnu: unison: Install unison-fsmonitor.
From: |
Ludovic Courtès |
Subject: |
03/04: gnu: unison: Install unison-fsmonitor. |
Date: |
Sun, 12 Jun 2016 21:55:53 +0000 (UTC) |
civodul pushed a commit to branch master
in repository guix.
commit 31d968fbcfa78b52c5280503417b67943f8a9660
Author: Orivej Desh <address@hidden>
Date: Sat Jun 11 04:24:21 2016 +0000
gnu: unison: Install unison-fsmonitor.
* gnu/packages/ocaml.scm (unison)[arguments]: Add 'install-fsmonitor'
phase.
Signed-off-by: Ludovic Courtès <address@hidden>
---
gnu/packages/ocaml.scm | 8 +++++++-
1 file changed, 7 insertions(+), 1 deletion(-)
diff --git a/gnu/packages/ocaml.scm b/gnu/packages/ocaml.scm
index a0a4b93..bd913f6 100644
--- a/gnu/packages/ocaml.scm
+++ b/gnu/packages/ocaml.scm
@@ -590,8 +590,14 @@ libpanel, librsvg and quartz.")
(mkdir-p bin)
(setenv "HOME" out) ; forces correct INSTALLDIR in Makefile
#t)))
+ (add-after 'install 'install-fsmonitor
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let* ((out (assoc-ref outputs "out"))
+ (bin (string-append out "/bin")))
+ ;; 'unison-fsmonitor' is used in "unison -repeat watch" mode.
+ (install-file "src/unison-fsmonitor" bin))))
(add-after 'install 'install-doc
- (lambda* (#:key inputs outputs #:allow-other-keys)
+ (lambda* (#:key outputs #:allow-other-keys)
(let ((doc (string-append (assoc-ref outputs "doc")
"/share/doc/unison")))
(mkdir-p doc)