diff --git a/reagent-data-views/src/reagent_data_views/client/component.cljs b/reagent-data-views/src/reagent_data_views/client/component.cljs index e3813cb..93cde16 100644 --- a/reagent-data-views/src/reagent_data_views/client/component.cljs +++ b/reagent-data-views/src/reagent_data_views/client/component.cljs @@ -58,7 +58,7 @@ propagate the changes to the server." [view-id & parameters] (let [view-sig {:view-id view-id - :parameters (or parameters [])} + :parameters (if parameters (vec parameters) [])} this (r/current-component)] (assert (not (nil? this)) "view-cursor can only be used within a defvc component's render function.") (update-component-state! this #(update-in % [:used-view-sigs] conj view-sig)) diff --git a/reagent-data-views/src/reagent_data_views/client/core.cljs b/reagent-data-views/src/reagent_data_views/client/core.cljs index e7bd7a2..84d245e 100644 --- a/reagent-data-views/src/reagent_data_views/client/core.cljs +++ b/reagent-data-views/src/reagent_data_views/client/core.cljs @@ -31,9 +31,8 @@ (defn- handle-view-refresh [view-sig data] (let [cursor (r/cursor view-data [view-sig])] (swap! cursor - #(-> % - (dissoc :loading?) - (assoc :data data))))) + #(assoc % :loading false + :data data)))) (defn subscribed? "Returns true if we are currently subscribed to the specified view."