fixed small goof in sc_get_data

USEPA · Jan 2, 2025 · 00b646b · 00b646b
1 parent b6334be
commit 00b646b
Showing 1 changed file with 0 additions and 4 deletions.
diff --git a/R/sc_get_data.R b/R/sc_get_data.R
@@ -126,10 +126,6 @@ sc_get_data <- function(comid = NULL,
     httr2::resp_body_string() |> 
     jsonlite::fromJSON()
     # End of function. Return a data frame.
-    if (is.null(countOnly)){
-      df <- df$items |> 
-        dplyr::select(comid, everything()) 
-    }
     return(df)
 }