diff options
author | Efraim Flashner | 2020-06-16 10:01:40 +0300 |
---|---|---|
committer | Efraim Flashner | 2020-06-16 10:08:15 +0300 |
commit | f4c3abf2b8625e73c8aa945c5be1ee3f4b6715be (patch) | |
tree | e5a88f5f22f1f79cec171b1c474e1fb41bd47717 /gn/packages | |
parent | 6f3f24b04d2d5d59d466ec74535d2257807c078b (diff) | |
download | guix-bioinformatics-f4c3abf2b8625e73c8aa945c5be1ee3f4b6715be.tar.gz |
containerize rn6-assembly app
Diffstat (limited to 'gn/packages')
-rw-r--r-- | gn/packages/bioinformatics.scm | 11 |
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) |