Fix the NA runCommand that doesn't work as advertised

nlmixr2 · Aug 4, 2024 · 733ad09 · 733ad09
1 parent ee03d62
commit 733ad09
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/R/monolixNlmixr2est.R b/R/monolixNlmixr2est.R
@@ -137,6 +137,9 @@
   cmd <- rxode2::rxGetControl(ui, "runCommand", "")
   if (is.character(cmd)) {
     cmd <- .monolixRunCommand
+  } else if (is.na(cmd)) {
+    .minfo("run Monolix manually and rerun nlmixr()")
+    return(NULL)
   } else if (!is.function(cmd)) {
     stop("invalid value for monolixControl(runCommand=)",
          call.=FALSE)
@@ -261,6 +264,9 @@
     .cmd <- rxode2::rxGetControl(.ui, "runCommand", "")
     if (!identical(.cmd, "")) {
       .monolixRunner(ui=.ui)
+      if (is.na(.cmd)) {
+        return(invisible())
+      }
     } else {
       if (.hasLixoftConnectors()) {
         .x <- try(lixoftConnectors::loadProject(.mlxtran), silent=TRUE)