remove static debug key

daroczig · Nov 20, 2018 · a75a7ba · a75a7ba
1 parent ad621a1
commit a75a7ba
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/s3.R b/R/s3.R
@@ -156,7 +156,7 @@ s3_ls <- function(uri) {
     uri_parts <- s3_split_uri(uri)
 
     objects <- s3()$Bucket(uri_parts$bucket_name)$objects
-    objects <- objects$filter(Prefix = 'tsm/4200')
+    objects <- objects$filter(Prefix = uri_parts$key)
     objects <- iterate(objects$pages(), simplify = FALSE)
     objects <- unlist(objects, recursive = FALSE)