                                (entry-res/add-follow-ups! conn entry-result (:new-follow-ups ctx) user))
           final-entry (if updating-follow-ups? updated-follow-ups entry-result)]
       (timbre/info "Created entry for:" entry-for "as" (:uuid final-entry))
-      (when (= (:status final-entry) "published")
+      (when (= (keyword (:status final-entry)) :published)
         (undraft-board conn user org board)
         (entry-res/delete-versions conn final-entry)
         (auto-share-on-publish conn ctx final-entry))

  ;; 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


      (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= (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))
