          (schema/validate lib-schema/UniqueID org-uuid)
          (sequential? additional-keys)
          (every? #(or (string? %) (keyword? %)) additional-keys)]}
-  (->> (into [primary-key :slug :name] additional-keys)
+  (->> (into [primary-key :slug :name :draft] additional-keys)
     (db-common/read-resources conn table-name :org-uuid org-uuid)
     (sort-by :slug)
     vec)))

  Given the uuid of the org, and slug of the board, delete the board and all its entries, and updates,
  and return `true` on success.
  "
  ([conn :guard db-common/conn? board :guard map?]
  (delete-board! conn (:uuid board)))

  ([conn :guard db-common/conn? org-uuid :guard #(schema/validate lib-schema/UniqueID %) slug :guard slug/valid-slug?]
  (if-let [uuid (:uuid (get-board conn org-uuid slug))]
    (delete-board! conn uuid)))

  ([conn :guard db-common/conn? uuid :guard #(schema/validate lib-schema/UniqueID %)]
  ;; Delete interactions
  (db-common/delete-resource conn common/interaction-table-name :board-uuid uuid)
  ;; Delete entries
  (db-common/delete-resource conn common/entry-table-name :board-uuid uuid)
  ;; Delete the board itself
  (db-common/delete-resource conn table-name uuid)))

;; ----- Board's set operations -----


            [if-let.core :refer (when-let*)]
            [defun.core :refer (defun)]
            [schema.core :as schema]
            [taoensso.timbre :as timbre]
            [oc.lib.schema :as lib-schema]
            [oc.lib.slugify :as slug]
            [oc.lib.db.common :as db-common]
