Bugs correction

Author: Francesco85P

Dockerfile

@@ -40,7 +40,7 @@ COPY inst/hg38_Coordinates.rds /app
 COPY inst/hg37_Coordinates.rds /app
 COPY tools/ReViewCNV.R /app
 
-CMD R -e "shiny::runApp('/app', host='0.0.0.0', port=as.numeric(Sys.getenv('PORT')))"
+CMD R -e "port <- as.numeric(Sys.getenv('PORT', '6868')); shiny::runApp('/app', host='0.0.0.0', port=port)"
 
 
 

tools/ReViewCNV.R

@@ -12,9 +12,6 @@ library(arrow)
 # Specify the application port
 
 
-port <- as.integer(Sys.getenv("SHINYPROXY_PORT", "6868"))
-options(shiny.port = port, shiny.host = "0.0.0.0")
-
 options(shiny.maxRequestSize = 50 * 1024^2)
 
 options(shiny.fullstacktrace = TRUE)