Patched issue with data-by-date call

quant-aq · Aug 30, 2023 · 39a5596 · 39a5596
1 parent 22e3a5d
commit 39a5596
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/wrappers.R b/R/wrappers.R
@@ -191,7 +191,7 @@ get_data <- function(sn, limit = 1000, start = NULL, stop = NULL, filter = NULL,
 #'
 #' @export
 get_data_by_date <- function(sn, date, raw = FALSE){
-  endpoint <- paste("devices", "sn", "data-by-date", sep = "/")
+  endpoint <- paste("devices", sn, "data-by-date", sep = "/")
 
   if(raw){
     endpoint <- paste(endpoint, "raw", sep="/")