From 80566eed033a990bd8d6eda31766f655b952ec56 Mon Sep 17 00:00:00 2001 From: Nicholas Kariniemi Date: Thu, 3 Jul 2014 19:02:39 +0300 Subject: [PATCH] Clean up fetching recipes from db --- src/clj/grub/db.clj | 12 +++++------- 1 file changed, 5 insertions(+), 7 deletions(-) diff --git a/src/clj/grub/db.clj b/src/clj/grub/db.clj index f6a198a..44a8207 100644 --- a/src/clj/grub/db.clj +++ b/src/clj/grub/db.clj @@ -67,13 +67,11 @@ (vec))) (defn get-current-recipes [] - (let [raw-recipes (mc/find-maps @db recipe-collection) - sorted-recipes (sort-by :_id (vec raw-recipes)) - recipes (map (fn [r] (-> r - (select-keys [:_id :name :grubs]) - (clojure.set/rename-keys {:_id :id}))) - sorted-recipes)] - recipes)) + (->> (mc/find-maps @db recipe-collection) + (sort-by :_id) + (map #(select-keys % [:_id :name :grubs])) + (map #(clojure.set/rename-keys % {:_id :id})) + (vec))) (def production-db "grub") (def development-db "grub-dev")