diff options
| author | Leo Famulari <leo@famulari.name> | 2016-10-17 22:57:52 -0400 |
|---|---|---|
| committer | Leo Famulari <leo@famulari.name> | 2016-10-19 16:00:26 -0400 |
| commit | c21b1a1fbb8c1b776cf831d24dfb1a742a4ded70 (patch) | |
| tree | 383b417f219cc69509e2cd2b76ff44847cc7640a | |
| parent | b332c823b78e61f2472309fa706d7609cbc9ef11 (diff) | |
| download | patches-c21b1a1fbb8c1b776cf831d24dfb1a742a4ded70.tar patches-c21b1a1fbb8c1b776cf831d24dfb1a742a4ded70.tar.gz | |
gnu: borg: Install more documentation.
* gnu/packages/backup.scm (borg)[arguments]: Install more documentation in
'install-doc' phase. Use (srfi srfi-26).
| -rw-r--r-- | gnu/packages/backup.scm | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/gnu/packages/backup.scm b/gnu/packages/backup.scm index 797c06e149..81925ab3ef 100644 --- a/gnu/packages/backup.scm +++ b/gnu/packages/backup.scm @@ -426,7 +426,10 @@ detection, and lossless compression.") delete-file (find-files "borg" "^(c|h|p).*\\.c$"))))) (build-system python-build-system) (arguments - `(#:phases + `(#:modules ((srfi srfi-26) ; for cut + (guix build utils) + (guix build python-build-system)) + #:phases (modify-phases %standard-phases (add-after 'unpack 'set-env (lambda* (#:key inputs #:allow-other-keys) @@ -439,7 +442,12 @@ detection, and lossless compression.") (add-after 'install 'install-doc (lambda* (#:key outputs #:allow-other-keys) (let* ((out (assoc-ref outputs "out")) - (man (string-append out "/share/man/man1"))) + (man (string-append out "/share/man/man1")) + (misc (string-append out "/share/borg/misc"))) + (for-each (cut install-file <> misc) + '("docs/misc/create_chunker-params.txt" + "docs/misc/internals-picture.txt" + "docs/misc/prune-example.txt")) (and (zero? (system* "python3" "setup.py" "build_ext" "--inplace")) (zero? (system* "make" "-C" "docs" "man")) |