Skip to content

Instantly share code, notes, and snippets.

@ck
Created March 6, 2011 22:34
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save ck/857803 to your computer and use it in GitHub Desktop.
Save ck/857803 to your computer and use it in GitHub Desktop.
Pick Aggregate
(database-test test-pick
(is (= @(-> (select users (where (= :id 4)))
(pick :name))
"Frank"))
(is (= @(-> users
(aggregate [:count/id :as :cnt])
(pick :cnt))
4)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment