From 8c5cc686f529b01fb65b91af5dd8b0ec6151eafd Mon Sep 17 00:00:00 2001
From: jlopez <jimmy.lopez0023@gmail.com>
Date: Wed, 6 Jun 2018 13:40:59 +0200
Subject: [PATCH] fin sing
---
server/opt_home.R | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/server/opt_home.R b/server/opt_home.R
index e7b409c..55820b2 100644
--- a/server/opt_home.R
+++ b/server/opt_home.R
@@ -372,9 +372,9 @@ createBiocontainer <- function(result, haveR) {
"\tapt-get clean", sep = "\n")
result <- paste0(result, "\n")
-
- result <- paste(result, "\tmkdir /opt/biotools", sep = "\n")
- result <- paste(result, "\tmkdir /opt/biotools/bin", sep = "\n")
+
+ result <- paste(result, '\tif[!-d "/opt/biotools"];then mkdir /opt/biotools; fi', sep = "\n")
+ result <- paste(result, '\tif[!-d "/opt/biotools/bin"];then mkdir /opt/biotools; fi', sep = "\n")
result <- paste(result, "\tchmod 777 -R /opt/biotools/", sep = "\n")
result <- paste(result, "\texport PATH=/opt/biotools/bin:$PATH", sep = "\n")
--
GitLab