diff --git a/R/photon_rstudioaddin.R b/R/photon_rstudioaddin.R index 5ff32fc..489cc8d 100644 --- a/R/photon_rstudioaddin.R +++ b/R/photon_rstudioaddin.R @@ -14,7 +14,7 @@ photon_rstudioaddin <- function(RscriptRepository = NULL) { # Shiny fileinput resethandler miniUI::gadgetTitleBar("Use Photon to Build Standalone Shiny Apps", - left = NULL, right = NULL), + left = NULL), miniUI::miniTabstripPanel( #miniUI::miniTabPanel( diff --git a/R/startFun.R b/R/startFun.R index c230642..d9aadec 100644 --- a/R/startFun.R +++ b/R/startFun.R @@ -118,7 +118,7 @@ startFun <- function(input_path, cran_packages=NULL, bioc_packages=NULL, github_ } else if(.Platform$OS.type=="unix") { - r_portable_path <- normalizePath(file.path(input_path, "R-Portable-Mac")) + r_portable_path <- normalizePath(file.path(electron_path, "R-Portable-Mac")) r_electron_version <- system(sprintf("cd %s; ./R CMD BATCH --version", @@ -160,6 +160,7 @@ startFun <- function(input_path, cran_packages=NULL, bioc_packages=NULL, github_ system(sprintf("cd %s; npm install; npm run package-mac", r_portable_path)) } + message("Photon finished") }