nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

gnu: unison: End all phases with #t. 

* gnu/packages/ocaml.scm (unison)[arguments]: End all phases with #t.
This commit is contained in:
Tobias Geerinckx-Rice 2018-10-08 16:38:27 +02:00
parent f6ccb95a86
commit 317e80cead
No known key found for this signature in database
GPG Key ID: 0DB0FF884F556D79
1 changed files with 15 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

31
gnu/packages/ocaml.scm
View File

@ -820,7 +820,8 @@ libpanel, librsvg and quartz.")
(let* ((out (assoc-ref outputs "out")) (let* ((out (assoc-ref outputs "out"))
(bin (string-append out "/bin"))) (bin (string-append out "/bin")))
;; 'unison-fsmonitor' is used in "unison -repeat watch" mode. ;; 'unison-fsmonitor' is used in "unison -repeat watch" mode.
(install-file "src/unison-fsmonitor" bin)))) (install-file "src/unison-fsmonitor" bin)
#t)))
(add-after 'install 'install-doc (add-after 'install 'install-doc
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let ((doc (string-append (assoc-ref outputs "doc") (let ((doc (string-append (assoc-ref outputs "doc")
@ -829,21 +830,19 @@ libpanel, librsvg and quartz.")
;; This file needs write-permissions, because it's ;; This file needs write-permissions, because it's
;; overwritten by 'docs' during documentation generation. ;; overwritten by 'docs' during documentation generation.
(chmod "src/strings.ml" #o600) (chmod "src/strings.ml" #o600)
(and (zero? (system* "make" "docs" (invoke "make" "docs"
"TEXDIRECTIVES=\\\\draftfalse")) "TEXDIRECTIVES=\\\\draftfalse")
(begin (for-each (lambda (f)
(for-each (lambda (f) (install-file f doc))
(install-file f doc)) (map (lambda (ext)
(map (lambda (ext) (string-append "doc/unison-manual." ext))
(string-append ;; Install only html documentation,
"doc/unison-manual." ext)) ;; since the build is currently
;; Install only html documentation, ;; non-reproducible with the ps, pdf,
;; since the build is currently ;; and dvi docs.
;; non-reproducible with the ps, pdf, '(;; "ps" "pdf" "dvi"
;; and dvi docs. "html")))
'(;;"ps" "pdf" "dvi" #t))))))
"html")))
#t))))))))
(home-page "https://www.cis.upenn.edu/~bcpierce/unison/") (home-page "https://www.cis.upenn.edu/~bcpierce/unison/")
(synopsis "File synchronizer") (synopsis "File synchronizer")
(description (description