2013-09-28 10:40:54 +02:00
|
|
|
(ns ldview.models.db
|
|
|
|
|
(:use korma.core
|
|
|
|
|
[korma.db :only (defdb)])
|
|
|
|
|
(:require [ldview.models.schema :as schema]))
|
|
|
|
|
|
|
|
|
|
(defdb db schema/db-spec)
|
|
|
|
|
|
2013-09-28 23:41:28 +02:00
|
|
|
(declare entities contests users sources)
|
|
|
|
|
|
|
|
|
|
(defentity entries
|
|
|
|
|
(belongs-to contests)
|
|
|
|
|
(belongs-to users)
|
|
|
|
|
(has-many sources))
|
|
|
|
|
|
2013-09-30 00:37:38 +02:00
|
|
|
(defentity competitions
|
2013-09-28 23:41:28 +02:00
|
|
|
(has-many entries))
|
|
|
|
|
|
|
|
|
|
(defentity users
|
|
|
|
|
(has-many entities))
|
|
|
|
|
|
|
|
|
|
(defentity sources
|
|
|
|
|
(belongs-to entities))
|
|
|
|
|
|
