aboutsummaryrefslogtreecommitdiff
path: root/gn/packages
diff options
context:
space:
mode:
authorEfraim Flashner2020-06-16 10:01:40 +0300
committerEfraim Flashner2020-06-16 10:08:15 +0300
commitf4c3abf2b8625e73c8aa945c5be1ee3f4b6715be (patch)
treee5a88f5f22f1f79cec171b1c474e1fb41bd47717 /gn/packages
parent6f3f24b04d2d5d59d466ec74535d2257807c078b (diff)
downloadguix-bioinformatics-f4c3abf2b8625e73c8aa945c5be1ee3f4b6715be.tar.gz
containerize rn6-assembly app
Diffstat (limited to 'gn/packages')
-rw-r--r--gn/packages/bioinformatics.scm11
1 files changed, 8 insertions, 3 deletions
diff --git a/gn/packages/bioinformatics.scm b/gn/packages/bioinformatics.scm
index 6ae76ae..fca21a9 100644
--- a/gn/packages/bioinformatics.scm
+++ b/gn/packages/bioinformatics.scm
@@ -15,6 +15,7 @@
#:use-module (guix build-system waf)
#:use-module (gnu packages)
#:use-module (gn packages python)
+ #:use-module (gnu packages base)
#:use-module (gnu packages bioconductor)
#:use-module (gnu packages bioinformatics)
#:use-module (gnu packages boost)
@@ -672,13 +673,16 @@ different datasets.
"/bin/Rscript"))
(convert (string-append (assoc-ref %build-inputs "imagemagick")
"/bin/convert"))
+ (cp (string-append (assoc-ref %build-inputs "coreutils")
+ "/bin/cp"))
(source (assoc-ref %build-inputs "source")))
(copy-recursively source targetdir)
(substitute* (string-append targetdir "/server.r")
;; This version is ideal for deploying with the included PNGs.
- ;; But we want all of them, so we use a local copy in gn-rshiny's $HOME.
+ ;; But we want all of them, so we use a local copy in shepherd's $HOME.
;;(("./pngs") (string-append targetdir "/pngs"))
- (("./pngs") "/home/gn-rshiny/hchen/rn6app/pngs")
+ (("./pngs") "/home/shepherd/rn6app/pngs")
+ (("cp") cp)
(("convert") convert))
(mkdir-p (string-append out "/bin"))
(call-with-output-file app
@@ -693,7 +697,8 @@ runApp(launch.browser=0, port=4202)~%\n"
#t))))
(native-inputs `(("source" ,source)))
(inputs
- `(("imagemagick" ,imagemagick)
+ `(("coreutils" ,coreutils-minimal)
+ ("imagemagick" ,imagemagick)
("r-min" ,r-minimal)))
(propagated-inputs
`(("freetype" ,freetype)