ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-26 04:29:25 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: bless: Remove trailing #T from snippet and build phases.

Browse source 
* gnu/packages/bioinformatics.scm (bless)[source, arguments]: Remove all
trailing #Ts.
This commit is contained in:
Ricardo Wurmus 2021-12-03 23:48:46 +01:00
parent 0e09065460
commit dd19c8da88
No known key found for this signature in database
GPG key ID: 197A5888235FACAC
1 changed files with 4 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
gnu/packages/bioinformatics.scm
View file

@ -1914,8 +1914,7 @@ (define-public bless
(delete-file-recursively "pigz") (delete-file-recursively "pigz")
(delete-file-recursively "google-sparsehash") (delete-file-recursively "google-sparsehash")
(delete-file-recursively "zlib") (delete-file-recursively "zlib")
(delete-file-recursively ".git") (delete-file-recursively ".git")))))
#t))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
'(#:tests? #f ;no "check" target '(#:tests? #f ;no "check" target
@ -1934,8 +1933,7 @@ (define-public bless
(add-after 'unpack 'do-not-build-bundled-pigz (add-after 'unpack 'do-not-build-bundled-pigz
(lambda* (#:key inputs outputs #:allow-other-keys) (lambda* (#:key inputs outputs #:allow-other-keys)
(substitute* "Makefile" (substitute* "Makefile"
(("cd pigz/pigz-2.3.3; make") "")) (("cd pigz/pigz-2.3.3; make") ""))))
#t))
(add-after 'unpack 'patch-paths-to-executables (add-after 'unpack 'patch-paths-to-executables
(lambda* (#:key inputs outputs #:allow-other-keys) (lambda* (#:key inputs outputs #:allow-other-keys)
(substitute* "parse_args.cpp" (substitute* "parse_args.cpp"
@ -1946,15 +1944,13 @@ (define-public bless
(("pigz_binary = .*") (("pigz_binary = .*")
(string-append "pigz_binary = \"" (string-append "pigz_binary = \""
(assoc-ref inputs "pigz") (assoc-ref inputs "pigz")
"/bin/pigz\";"))) "/bin/pigz\";")))))
#t))
(replace 'install (replace 'install
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let ((bin (string-append (assoc-ref outputs "out") "/bin/"))) (let ((bin (string-append (assoc-ref outputs "out") "/bin/")))
(for-each (lambda (file) (for-each (lambda (file)
(install-file file bin)) (install-file file bin))
'("bless" "kmc/bin/kmc")) '("bless" "kmc/bin/kmc")))))
#t)))
(delete 'configure)))) (delete 'configure))))
(native-inputs (native-inputs
`(("perl" ,perl))) `(("perl" ,perl)))