diff options
| -rw-r--r-- | cljssss-g.clj | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/cljssss-g.clj b/cljssss-g.clj index 5d56365..e79afa6 100644 --- a/cljssss-g.clj +++ b/cljssss-g.clj @@ -101,10 +101,7 @@ ["SELECT id FROM feed WHERE uri=?" url] id) (let [free-id (+ 1 (maximum-id "feed"))] - (sql/update-or-insert-values :feed - ["id = ?" free-id] - {:id free-id - :uri url}) + (sql/insert-values :feed [:id :uri] [free-id url]) free-id)))] (when maybe-id (fetch-feed maybe-id)) |