refactor

2013-05-21 22:40:23 -04:00 · 2013-05-21 22:40:23 -04:00 · eece264d27
parent f70e17a653
commit eece264d27
1 changed files with 1 additions and 3 deletions
--- a/src/blarg/models/posts.clj
+++ b/src/blarg/models/posts.clj
@ -65,9 +65,7 @@
  (update-post id nil nil nil nil publish? reset-date?))

 (defn list-tags []
-  (map
-    (fn [x]
-      (:key x))
+  (->view-keys
    (couch/with-db posts
      (couch/get-view "posts" "listTags" {:group true}))))