                         false))
   
   ;; Responses
-  :handle-ok (fn [ctx] (entry-rep/render-entry (:existing-org ctx)
-                                               (:existing-board ctx)
-                                               (:existing-entry ctx)
-                                               (:existing-comments ctx)
-                                               (:existing-reactions ctx)
-                                               (:access-level ctx)
-                                               (-> ctx :user :user-id)
-                                               :secure)))
+  :handle-ok (fn [ctx] (let [access-level (:access-level ctx)
+                             user-id (-> ctx :user :user-id)
+                             org-id (-> ctx :existing-org :uuid)]
+                          (entry-rep/render-entry (:existing-org ctx)
+                                                  (:existing-board ctx)
+                                                  (:existing-entry ctx)
+                                                  (:existing-comments ctx)
+                                                  (if (or (= :author access-level) (= :viewer access-level))
+                                                    (reaction-res/reactions-with-favorites conn
+                                                                                           org-id
+                                                                                           user-id
+                                                                                           (:existing-reactions ctx))
+                                                    [])
+                                                  access-level
+                                                  user-id
+                                                  :secure))))
 
 ;; ----- Routes -----
 


  ;; Responses
  :handle-ok (by-method {
    :get (fn [ctx] (entry-rep/render-entry 
                      (:existing-org ctx)
                      (:existing-board ctx)
                      (:existing-entry ctx)
                      (:existing-comments ctx)
                      (:existing-reactions ctx)
                      (:access-level ctx)
                      (-> ctx :user :user-id)))
    :patch (fn [ctx] (entry-rep/render-entry
                        (:existing-org ctx)
                        (:existing-board ctx)
                        (:updated-entry ctx)
                        (:existing-comments ctx)
                        (:existing-reactions ctx)
                        (:access-level ctx)
                        (-> ctx :user :user-id)))})
  :handle-unprocessable-entity (fn [ctx]
    (api-common/unprocessable-entity-response (schema/check common-res/Entry (:updated-entry ctx)))))


            [oc.storage.resources.common :as common-res]
            [oc.storage.resources.org :as org-res]
            [oc.storage.resources.board :as board-res]
            [oc.storage.resources.entry :as entry-res]
            [oc.storage.resources.reaction :as reaction-res]))

;; ----- Utility functions -----

