diff options
| author | Tobias Geerinckx-Rice <me@tobias.gr> | 2018-05-18 15:17:33 +0200 |
|---|---|---|
| committer | Tobias Geerinckx-Rice <me@tobias.gr> | 2018-05-19 05:30:11 +0200 |
| commit | c61d822621df97f7d30915ff1d30ac3d34179b88 (patch) | |
| tree | fcea849b6f4de1b4ea8a254affcd829d2d276eb9 | |
| parent | 7c2a46461e852f9e0813e5bba9598e3e2c590905 (diff) | |
| download | guix-c61d822621df97f7d30915ff1d30ac3d34179b88.tar guix-c61d822621df97f7d30915ff1d30ac3d34179b88.tar.gz | |
gnu: f-seq: Factorise ‘install’ phase.
* gnu/packages/bioinformatics.scm (f-seq)[arguments]: Let-bind more.
| -rw-r--r-- | gnu/packages/bioinformatics.scm | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/gnu/packages/bioinformatics.scm b/gnu/packages/bioinformatics.scm index 8bfe01fd6f..a6d28be4e3 100644 --- a/gnu/packages/bioinformatics.scm +++ b/gnu/packages/bioinformatics.scm @@ -11550,7 +11550,9 @@ browser.") (replace 'install (lambda* (#:key inputs outputs #:allow-other-keys) (let* ((target (assoc-ref outputs "out")) - (doc (string-append target "/share/doc/f-seq/"))) + (bin (string-append target "/bin")) + (doc (string-append target "/share/doc/f-seq")) + (lib (string-append target "/lib"))) (mkdir-p target) (mkdir-p doc) (substitute* "bin/linux/fseq" @@ -11559,11 +11561,11 @@ browser.") (string-append (assoc-ref inputs "java-commons-cli") "/share/java/commons-cli.jar")) (("REALDIR=.*") - (string-append "REALDIR=" target "/bin\n"))) + (string-append "REALDIR=" bin "\n"))) (install-file "README.txt" doc) - (install-file "bin/linux/fseq" (string-append target "/bin")) - (install-file "build~/fseq.jar" (string-append target "/lib")) - (copy-recursively "lib" (string-append target "/lib")) + (install-file "bin/linux/fseq" bin) + (install-file "build~/fseq.jar" lib) + (copy-recursively "lib" lib) #t)))))) (inputs `(("perl" ,perl) |