Merge branch 'master' of http://gitlab.mbb.univ-montp2.fr/jlopez/RPACIB

server/opt_home.R

@@ -351,20 +351,13 @@ createBioconductorPackage <- function(result) {
 }
 
 createPathBiocontainer <- function(result) {
-  
-  
-  print("PATH")
-  
+
   if(input$containerType == "singularity") {
     selectBioTool <- input$selectedBiocontainer
     for (tool in selectBioTool){
-      
-      print(tool)
-      
+    
       to <- getInstallToolEnvBioContainer(tool, input$containerType)
-      
-      print(to)
-      
+    
       if(is.character(to)) {
         result <- paste0(result, "\n\t", to)
       }
@@ -385,8 +378,6 @@ createPathBiocontainer <- function(result) {
     
   }
   
-  print(result)
-  
   return(result)
   
 }