       (when (= (keyword (:status entry)) :draft)
         (let [remaining-entries (entry-res/list-all-entries-by-board conn (:uuid board))]
           (board-res/maybe-delete-draft-board conn org board remaining-entries (:user ctx))))
-      (when (not= (:status entry) "published")
+      (when (not= (keyword (:status entry)) :published)
         (entry-res/delete-versions conn (assoc entry :delete-entry true)))
       (timbre/info "Deleted entry for:" entry-for)
       (notification/send-trigger! (notification/->trigger :delete org board {:old entry} (:user ctx) nil))

  ;; Validations
  :processable? (by-method {
    :options true
    :post (fn [ctx] (valid-entry-new-update? conn ctx org-slug entry-uuid (:user ctx) action-type))})

  :malformed? false


     :existing-entries (api-common/rep entries)}
    false))

(defn- valid-entry-inbox-update? [conn ctx org-slug entry-uuid user action-type]
  (timbre/info "Valid new update for" entry-uuid "from user" (:user-id user) "action" action-type)
  (if-let* [existing-entry (entry-res/get-entry conn entry-uuid)
            existing-org (or (:existing-org ctx) (org-res/get-org conn org-slug))
