Update pega_dados.R

denis-or · Feb 29, 2024 · 0f9f781 · 0f9f781
1 parent 7e06189
commit 0f9f781
Showing 1 changed file with 7 additions and 7 deletions.
diff --git a/R/pega_dados.R b/R/pega_dados.R
@@ -63,15 +63,15 @@ pega_dados <- function(...) {
 
   args <- list(...)
 
-  if (missing(args$ob) || is.null(args$ob)) {
-    usethis::ui_stop("O argumento ob \\\\u00e9 obrigat\\u00f3rio e n\\u00e3o pode ser NULL.")
-  }
+  #if (missing(args$ob) || is.null(args$ob)) {
+   # usethis::ui_stop("O argumento ob \\\\u00e9 obrigat\\u00f3rio e n\\u00e3o pode ser NULL.")
+  #}
 
-  if (!xor(is.null(args[['Medidas']]), is.null(args[['Conteúdo']]))) {
-    usethis::ui_stop("Apenas um dos argumentos Medidas ou Conte\\u00fado deve ser fornecido.")
-  }
+  #if (!xor(is.null(args[['Medidas']]), is.null(args[['Conteúdo']]))) {
+  #  usethis::ui_stop("Apenas um dos argumentos Medidas ou Conte\\u00fado deve ser fornecido.")
+  #}
 
-  argumentos_obrigatorios <- c("Linha", "Coluna", "Per\\u00edodos dispon\\u00edveis")
+  argumentos_obrigatorios <- c("Linha", "Coluna")#, "Per\\u00edodos dispon\\u00edveis")
 
   purrr::walk(argumentos_obrigatorios, ~{
     if (is.null(args[[.x]])) {