diff options
author | Alex Auvolat <alex@adnab.me> | 2023-10-24 11:39:45 +0200 |
---|---|---|
committer | Alex Auvolat <alex@adnab.me> | 2023-10-24 11:39:45 +0200 |
commit | d2c365767b0a4cb70dcbb1d20b75f41e0f9c20c8 (patch) | |
tree | 04be8d159078a42304bc19a20ac6ac5f206a657b /script/jepsen.garage/src/jepsen/garage/s3api.clj | |
parent | fb6c9a1243bd561d2a0de6b49c8debf37d566473 (diff) | |
download | garage-d2c365767b0a4cb70dcbb1d20b75f41e0f9c20c8.tar.gz garage-d2c365767b0a4cb70dcbb1d20b75f41e0f9c20c8.zip |
jepsen: more testing
Diffstat (limited to 'script/jepsen.garage/src/jepsen/garage/s3api.clj')
-rw-r--r-- | script/jepsen.garage/src/jepsen/garage/s3api.clj | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/script/jepsen.garage/src/jepsen/garage/s3api.clj b/script/jepsen.garage/src/jepsen/garage/s3api.clj index 4f292ac0..531e0157 100644 --- a/script/jepsen.garage/src/jepsen/garage/s3api.clj +++ b/script/jepsen.garage/src/jepsen/garage/s3api.clj @@ -39,12 +39,10 @@ new-object-summaries (:object-summaries list-result) new-objects (map (fn [d] (:key d)) new-object-summaries) objects (concat new-objects accum)] - (info (:endpoint creds) "ListObjectsV2 prefix(" prefix "), ct(" ct "): " new-objects) (if (:truncated? list-result) (list-inner creds prefix (:next-continuation-token list-result) objects) objects))) (defn list "Helper for ListObjects -- just lists everything in the bucket" [creds prefix] - (info "in s3/list creds:" creds ", prefix:" prefix) (list-inner creds prefix nil [])) |