(ns ldview.models.competition (:use korma.core [ldview.models.db] [ldview.tasks.scrape :as configuration :only [competition]])) (defn latest [] (first (select competitions (where {:number configuration/competition}) ; FIXME: Make it dynamic (limit 1)))) (defn exists? [number] (not (empty? (select competitions (fields :id) (where {:number number}))))) (defn create! [number motto] (insert competitions (values {:number number :motto motto})))