Fix createVariant

rte-antares-rpackage · Feb 1, 2023 · 4ce0bba · 4ce0bba
1 parent e29534d
commit 4ce0bba
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 3 deletions.
diff --git a/NEWS.md b/NEWS.md
@@ -3,6 +3,7 @@
 BUGFIXES :
 
 * Fix case sensitivity for `editCluster()` in API mode
+* Fix opts returned (proper new study_id) when using `createVariant()`
 
 
 

diff --git a/R/API.R b/R/API.R
@@ -155,10 +155,8 @@ createVariant <- function(name, opts = antaresRead::simOptions()) {
   } else {
     cli::cli_alert_danger("Failed to create variant")
   }
-  opts$study_id <- content(result)
-  opts$modeAPI <- "sync"
+  opts <- setSimulationPathAPI(host=opts$host, token=opts$token, study_id=content(result), simulation="input")
   options("antaresEditObject.apiCommands" = list())
-  options(antares = opts)
   return(invisible(opts))
 }
Original file line number	Diff line number	Diff line change
Expand Up		@@ -3,6 +3,7 @@
		BUGFIXES :

		* Fix case sensitivity for `editCluster()` in API mode
		* Fix opts returned (proper new study_id) when using `createVariant()`



Expand Down