ldview/src/ldview/models/source.clj

11 lines
310 B
Clojure

(ns ldview.models.source
(:use korma.core
[ldview.db]))
(defn create! [entry_id uri title]
; (if (empty? (select sources (where {:entry_id entry_id :type title})))
(insert sources (values {:entry_id entry_id
:uri uri
:type title})));)