Sort e.g. numerical grubs properly

This commit is contained in:
Nicholas Kariniemi 2014-07-02 23:24:27 +03:00
parent c23bab8964
commit a3dc09b335

View file

@ -79,7 +79,7 @@
match)))
(defn sort-grubs [grubs]
(sort-by (juxt :completed get-grub-ingredient) (vals grubs)))
(sort-by (juxt :completed get-grub-ingredient :grub) (vals grubs)))
(defn add-grub-event [grub]
{:event :add-grub