luciano/bandalore
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Make :prefix a keyword argument of list-queues

Browse source
This commit is contained in:
Tim Chagnon 2013-11-26 10:21:16 -08:00
parent 960c5e4966
commit 382fd20418
2 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/main/clojure/cemerick/bandalore.clj
View file

@ -52,7 +52,7 @@
(defn list-queues
"Returns a seq of all queues' URL strings. Takes an optional string prefix
argument to only list queues with names that start with the prefix."
[^AmazonSQSClient client &[prefix]]
[^AmazonSQSClient client & {:keys [prefix]}]
(->> (ListQueuesRequest. prefix)
(.listQueues client)
.getQueueUrls

2
src/test/clojure/cemerick/bandalore_test.clj
View file

@ -60,7 +60,7 @@
(send client *test-queue-url* msg)
(wait-for-condition #((set (list-queues client)) *test-queue-url*)
"Created queue not visible in result of list-queues")
(wait-for-condition #((set (list-queues client test-queue-name-prefix)) *test-queue-url*)
(wait-for-condition #((set (list-queues client :prefix test-queue-name-prefix)) *test-queue-url*)
"Created queue not visible in result of list-queues with prefix")))
(defsqstest test-queue-attrs