Replace hasArg with missing

ryanzomorrodi · Nov 17, 2024 · eb47a63 · eb47a63
1 parent 7202272
commit eb47a63
Show file tree

Hide file tree

Showing 3 changed files with 5 additions and 5 deletions.
diff --git a/R/connection.R b/R/connection.R
@@ -10,10 +10,10 @@
 #' 
 #' @export
 sas_connect <- function(config) {
-  if (hasArg(config)) {
-    .pkgenv$session <- .pkgenv$saspy$SASsession(config)
-  } else {
+  if (missing(config)) {
     .pkgenv$session <- .pkgenv$saspy$SASsession()
+  } else {
+    .pkgenv$session <- .pkgenv$saspy$SASsession(config)
   }
 }
 

diff --git a/R/run.R b/R/run.R
@@ -35,7 +35,7 @@ sas_run_file <- function(input_path, output_path, overwrite = FALSE) {
 
   input <- read_file(input_path)
 
-  if (!hasArg(output_path)) {
+  if (missing(output_path)) {
     return(sas_run_string(input))
   }
 

diff --git a/R/use_quarto.R b/R/use_quarto.R
@@ -11,7 +11,7 @@
 #' 
 #' @export
 sas_use_quarto <- function(path) {
-  if (!hasArg(path)) {
+  if (missing(path)) {
     path <- "."
   } else if (!dir.exists(path)) {
     stop("Specified directory does not exist")