From 365133f0a1264ef5a73c47a95702b2964ea6d67f Mon Sep 17 00:00:00 2001 From: Andrew Suzuki Date: Thu, 9 Jun 2016 17:05:18 -0400 Subject: [PATCH] dispatch :workspace-faculty-request on :workspace-switch --- src/cljs/ulysses/config.cljs | 1 - src/cljs/ulysses/handlers.cljs | 1 + 2 files changed, 1 insertion(+), 1 deletion(-) diff --git a/src/cljs/ulysses/config.cljs b/src/cljs/ulysses/config.cljs index 3ae173c..d945f26 100644 --- a/src/cljs/ulysses/config.cljs +++ b/src/cljs/ulysses/config.cljs @@ -26,7 +26,6 @@ (def api-hostname (if (or debug? (string/includes? hostname "staging")) "http://ulysses-api-staging.core" - ; "http://localhost:8000" "http://ulysses-api-alpha.core")) (def api-endpoint (str api-hostname "/api")) diff --git a/src/cljs/ulysses/handlers.cljs b/src/cljs/ulysses/handlers.cljs index ba431d1..bc6de33 100644 --- a/src/cljs/ulysses/handlers.cljs +++ b/src/cljs/ulysses/handlers.cljs @@ -232,6 +232,7 @@ (register-handler :workspace-switch (fn [db [_ workspace-id-maybe]] + (dispatch [:workspace-faculty-request]) (if workspace-id-maybe (if-let [target (find-by-id workspace-id-maybe (:workspaces db))] (assoc db :builder-workspace target)