 
 (defn- assemble-board
   "Assemble the entry, topic, author, and viewer data needed for a board response."
-  [conn org-slug slug board ctx]
-  (let [entries (entry-res/list-entries-by-board conn (:uuid board)) ; all entries for the board
+  [conn org-slug board ctx]
+  (let [slug (:slug board)
+        entries (entry-res/list-entries-by-board conn (:uuid board)) ; all entries for the board
         board-topics (->> entries
                         (map #(select-keys % [:topic-slug :topic-name]))
                         (filter :topic-slug) ; remove entries w/ no topic

    (-> board 
      (assoc :authors author-reps)
      (assoc :viewers viewer-reps)
      (assoc :stories story-reps))))

;; ----- Validations -----


                               org (or (:existing-org ctx) (org-res/get-org conn org-slug))
                               org-uuid (:uuid org)
                               board (or (:existing-board ctx)
                                         (if (= slug (:slug board-res/default-drafts-storyboard))
                                            (board-res/drafts-storyboard org-uuid (:user ctx))
                                            (board-res/get-board conn org-uuid slug)))]
                        {:existing-org org :existing-board board}
                        false))

