Skip to content

Instantly share code, notes, and snippets.

@alandipert

alandipert/tags.boot Secret

Created December 28, 2015 22:26
Show Gist options
  • Star 1 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save alandipert/39c65618ecc716e38210 to your computer and use it in GitHub Desktop.
Save alandipert/39c65618ecc716e38210 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
tags.boot
(set-env! :dependencies '[[com.amazonaws/aws-java-sdk "1.10.26"]])
(import [com.amazonaws.services.s3 AmazonS3Client])
(def s3-client
(let [creds (com.amazonaws.auth.BasicAWSCredentials.
(System/getenv "AWS_ACCESS_KEY")
(System/getenv "AWS_SECRET_KEY"))]
(AmazonS3Client. creds)))
(->> (.getBucketTaggingConfiguration s3-client "my-bukkit")
.getAllTagSets
(map (memfn getAllTags))
(reduce merge))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment