me/guix
Archived
1
0
Fork 0
Code Activity

gnu: fastqc: Use gexp.

Browse source 
* gnu/packages/bioinformatics.scm (fastqc)[arguments]: Use gexp; drop
trailing #T from build phase.
[inputs]: Drop package labels.
This commit is contained in:
Ricardo Wurmus 2023-02-13 22:34:37 +01:00
parent 47f0e022dc
commit 7260cc75da
No known key found for this signature in database
GPG key ID: 197A5888235FACAC
1 changed files with 34 additions and 37 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

71
gnu/packages/bioinformatics.scm
View file

@ -5262,44 +5262,41 @@ VCF.")
"18rrlkhcrxvvvlapch4dpj6xc6mpayzys8qfppybi8jrpgx5cc5f")))) "18rrlkhcrxvvvlapch4dpj6xc6mpayzys8qfppybi8jrpgx5cc5f"))))
(build-system ant-build-system) (build-system ant-build-system)
(arguments (arguments
`(#:tests? #f ; there are no tests (list
#:build-target "build" #:tests? #f ;there are no tests
#:phases #:build-target "build"
(modify-phases %standard-phases #:phases
(add-after 'unpack 'fix-dependencies #~(modify-phases %standard-phases
(lambda* (#:key inputs #:allow-other-keys) (add-after 'unpack 'fix-dependencies
(substitute* "build.xml" (lambda* (#:key inputs #:allow-other-keys)
(("jbzip2-0.9.jar") (substitute* "build.xml"
(search-input-file inputs "/share/java/jbzip2.jar")) (("jbzip2-0.9.jar")
(("sam-1.103.jar") (search-input-file inputs "/share/java/jbzip2.jar"))
(search-input-file inputs (("sam-1.103.jar")
"/share/java/sam-1.112.jar")) (search-input-file inputs "/share/java/sam-1.112.jar"))
(("cisd-jhdf5.jar") (("cisd-jhdf5.jar")
(search-input-file inputs (search-input-file inputs "/share/java/sis-jhdf5.jar")))))
"/share/java/sis-jhdf5.jar"))))) ;; There is no installation target
;; There is no installation target (replace 'install
(replace 'install (lambda* (#:key inputs outputs #:allow-other-keys)
(lambda* (#:key inputs outputs #:allow-other-keys) (let* ((bin (string-append #$output "/bin"))
(let* ((out (assoc-ref outputs "out")) (share (string-append #$output "/share/fastqc/"))
(bin (string-append out "/bin")) (exe (string-append share "/fastqc")))
(share (string-append out "/share/fastqc/")) (for-each mkdir-p (list bin share))
(exe (string-append share "/fastqc"))) (copy-recursively "bin" share)
(for-each mkdir-p (list bin share)) (substitute* exe
(copy-recursively "bin" share) (("my \\$java_bin = 'java';")
(substitute* exe (string-append "my $java_bin = '"
(("my \\$java_bin = 'java';") (search-input-file inputs "/bin/java")
(string-append "my $java_bin = '" "';")))
(assoc-ref inputs "java") (chmod exe #o555)
"/bin/java';"))) (symlink exe (string-append bin "/fastqc"))))))))
(chmod exe #o555)
(symlink exe (string-append bin "/fastqc"))
#t))))))
(inputs (inputs
`(("java" ,icedtea) (list icedtea
("perl" ,perl) ; needed for the wrapper script java-cisd-jhdf5
("java-cisd-jhdf5" ,java-cisd-jhdf5) java-picard-1.113
("java-picard-1.113" ,java-picard-1.113) java-jbzip2
("java-jbzip2" ,java-jbzip2))) perl)) ;needed for the wrapper script
(native-inputs (native-inputs
(list unzip)) (list unzip))
(home-page "https://www.bioinformatics.babraham.ac.uk/projects/fastqc/") (home-page "https://www.bioinformatics.babraham.ac.uk/projects/fastqc/")