futurile/guix-play
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

gnu: bandage: Do not yet use the 'imagemagick/stable' variant.

Browse Source 
Once <https://issues.guix.gnu.org/47475> (‘Closure of bandage is way too
large’) has been fixed, the variant will probably be usable.

* gnu/packages/bioinformatics.scm (bandage):
[arguments]<#:disallowed-references>: Once the issue
has been fixed, prevent the imagemagick/stable package from ending up in the
closure.
[native-inputs]: Note that 'imagemagick/stable' cannot be used yet.

Signed-off-by: Maxim Cournoyer <maxim.cournoyer@gmail.com>
Modified-by: Maxim Cournoyer <maxim.cournoyer@gmail.com>
Change-Id: Ie13100eb424b14971055ff91db49bc7029cb6168
This commit is contained in:
Maxime Devos 2021-03-29 17:46:36 +02:00 committed by Ludovic Courtès
parent 7c7ca0b625
commit dbb5650682
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 26 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

46
gnu/packages/bioinformatics.scm
View File

@ -17169,29 +17169,35 @@ Thus the per-base error rate is similar to the raw input reads.")
(base32 "1bbsn5f5x8wlspg4pbibqz6m5vin8c19nl224f3z3km0pkc97rwv"))))
(build-system qt-build-system)
(arguments
`(#:phases
(modify-phases %standard-phases
(replace 'configure
(lambda _
(invoke "qmake" "Bandage.pro")))
(replace 'check
(lambda* (#:key tests? #:allow-other-keys)
(when tests?
(substitute* "tests/bandage_command_line_tests.sh"
(("^bandagepath=.*")
(string-append "bandagepath=" (getcwd) "/Bandage\n")))
(with-directory-excursion "tests"
(setenv "XDG_RUNTIME_DIR" (getcwd))
(invoke "./bandage_command_line_tests.sh")))
#t))
(replace 'install
(lambda* (#:key outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out")))
(install-file "Bandage" (string-append out "/bin"))
#t))))))
(list
;; TODO: Once <https://issues.guix.gnu.org/47475> is fixed,
;; consider uncommenting the following:
;;
;; Prevent the (rarely updated) imagemagick/stable package from
;; ending up in the closure.
;; #:disallowed-references (list imagemagick/stable)
#:phases
#~(modify-phases %standard-phases
(replace 'configure
(lambda _
(invoke "qmake" "Bandage.pro")))
(replace 'check
(lambda* (#:key tests? #:allow-other-keys)
(when tests?
(substitute* "tests/bandage_command_line_tests.sh"
(("^bandagepath=.*")
(string-append "bandagepath=" (getcwd) "/Bandage\n")))
(with-directory-excursion "tests"
(setenv "XDG_RUNTIME_DIR" (getcwd))
(invoke "./bandage_command_line_tests.sh")))))
(replace 'install
(lambda _
(install-file "Bandage" (string-append #$output "/bin")))))))
(inputs
(list qtbase-5 qtsvg-5))
(native-inputs
;; imagemagick/stable cannot be used here, as it will end up in
;; the closure. See <https://issues.guix.gnu.org/47475>.
(list imagemagick))
(home-page "https://rrwick.github.io/Bandage/")
(synopsis