Fixed incorrect condition (\!nzchar -> nzchar) in jmvOpn

sjentsch · Aug 4, 2023 · 9f9acea · 9f9acea
1 parent d579eb9
commit 9f9acea
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/globals.R b/R/globals.R
@@ -493,7 +493,7 @@ jmvOpn <- function(dtaFrm = NULL, sfxTtl = "") {
             stop(sprintf("Your OS (%s) is currently not implemented. Please report more details to sebastian.jentschke@uib.no to fix that.", crrOS))
         }
     }
-    if (!nzchar(jmvEXE) && file.exists(jmvEXE)) {
+    if (nzchar(jmvEXE) && file.exists(jmvEXE)) {
         tmpOut <- tempfile(fileext = ".omv")
         jmvReadWrite::write_omv(dtaFrm, fleOut = tmpOut)
 # TO-DO: replace Dataset with the name of the current data set