• Untitled

    tnoborio        
    0 Likes0 Commentsclojure

    (defn create [{course-id :id
                   tutor-id :tutor-id :as course} open-at & [title]]
      {:pre [(seq tutor-id)
             (instance? java.util.Date open-at)
             (seq course-id)]}
      (insert
       "schedules"
       (assoc-if
        (seq title)
        {:tutor-id tutor-id
         :open-at open-at
         :course-id course-id}
        :title title)))
    

Comments (0)