diff --git a/src/ldview/models/entry.clj b/src/ldview/models/entry.clj
index c747254..56d2424 100644
--- a/src/ldview/models/entry.clj
+++ b/src/ldview/models/entry.clj
@@ -22,12 +22,11 @@
   (let [username (user/unique-user (:author fields))
         competition-id (:id (competition/latest))]
     (if-not (exists? (:ld_uid fields))
-      (insert entries (values {
-                               :ld_uid (:ld_uid fields)
+      (insert entries (values {:ld_uid (:ld_uid fields)
                                :title (:title fields)
                                :description (:description fields)
                                :type (:type fields)
                                :user_id (:id username)
                                :competition_id competition-id})))
-    (for [link (:links fields)]
+    (doseq [link (:links fields)]
       (source/create! (:id (by-ld-uid (:ld_uid fields))) (:url link) (:title link)))))