 
 (defn get-wishlist-with-wishes [{:keys [code]}]
   (when-let [wishlist (get-wishlist {:code code})]
-    (assoc wishlist :wishes (get-wishes-for-wishlist-no-date wishlist))))+    (assoc wishlist :wishes (get-wishes-for-wishlist wishlist))))
    (try 
      (helper-insert-wishlist finished)
      (catch Exception _
        (new-insert-wishlist wishlist))))) ; simply try again if it fails

(defn delete-wishlist [{:keys [code]}] ; code is unique
  (first

    (sql/with-query-results results
      ["select * from wish where wishlist=?" id]
      (into [] results))))

(defn insert-wish [wish {:keys [id]}]
  (sql/with-connection db
