From c61d822621df97f7d30915ff1d30ac3d34179b88 Mon Sep 17 00:00:00 2001 From: Tobias Geerinckx-Rice Date: Fri, 18 May 2018 15:17:33 +0200 Subject: =?UTF-8?q?gnu:=20f-seq:=20Factorise=20=E2=80=98install=E2=80=99?= =?UTF-8?q?=20phase.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit * gnu/packages/bioinformatics.scm (f-seq)[arguments]: Let-bind more. --- gnu/packages/bioinformatics.scm | 12 +++++++----- 1 file 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) -- cgit v1.2.3