File tree Expand file tree Collapse file tree 1 file changed +6
-1
lines changed
Expand file tree Collapse file tree 1 file changed +6
-1
lines changed Original file line number Diff line number Diff line change @@ -759,9 +759,14 @@ varargsToJProperties <- function(...) {
759759launchScript <- function (script , combinedArgs , wait = FALSE ) {
760760 if (.Platform $ OS.type == " windows" ) {
761761 scriptWithArgs <- paste(script , combinedArgs , sep = " " )
762+ # on Windows, intern = F seems to mean output to the console. (documentation on this is missing)
762763 shell(scriptWithArgs , translate = TRUE , wait = wait , intern = wait ) # nolint
763764 } else {
764- system2(script , combinedArgs , wait = wait )
765+ # http://stat.ethz.ch/R-manual/R-devel/library/base/html/system2.html
766+ # stdout = F means discard output
767+ # stdout = "" means to its console (default)
768+ # Note that the console of this child process might not be the same as the running R process.
769+ system2(script , combinedArgs , stdout = " " , wait = wait )
765770 }
766771}
767772
You can’t perform that action at this time.
0 commit comments