Sets up impersonate for ssr pages too

src/cljs/auto_ap/views/pages/admin/users/table.cljs

@@ -1,11 +1,32 @@
 (ns auto-ap.views.pages.admin.users.table
-  (:require 
-   [clojure.string :as str]
-   [re-frame.core :as re-frame]
-   [auto-ap.views.utils :refer [action-cell-width]]
-   [auto-ap.views.pages.admin.users.form :as form]
+  (:require
    [auto-ap.views.components.buttons :as buttons]
-   [auto-ap.views.components.grid :as grid]))
+   [auto-ap.views.components.grid :as grid]
+   [auto-ap.views.pages.admin.users.form :as form]
+   [auto-ap.views.utils
+    :refer [action-cell-width dispatch-event with-user]]
+   [clojure.string :as str]
+   [re-frame.core :as re-frame]))
+
+(re-frame/reg-event-fx
+  ::impersonated
+  (fn [_ [_ impersonate-jwt]]
+    (println "SUCCESED")
+    (.setItem js/localStorage "jwt" impersonate-jwt)
+    (.removeItem js/localStorage "last-client-id" nil)
+    (.removeItem js/localStorage "last-selected-clients" nil)
+    (.reload (.-location js/document ) true)
+    {}))
+
+(re-frame/reg-event-fx
+  ::impersonate
+  [with-user]
+  (fn [{:keys [db user]} [_ impersonate-jwt]]
+    (js/alert "HI")
+    
+    {:http {:method "GET"
+             :uri (str "/impersonate?jwt=" impersonate-jwt)
+             :on-success [::impersonated impersonate-jwt]}}))
 
 (re-frame/reg-event-fx
  ::params-changed
@@ -50,11 +71,7 @@
           [grid/cell {} role]
           [grid/cell {} (str/join ", " (map :name clients))]
           [grid/cell {}
-           [:a.button {:on-click (fn []
-                                   (.setItem js/localStorage "jwt" (:impersonate-jwt c))
-                                   (.removeItem js/localStorage "last-client-id" nil)
-                                   (.removeItem js/localStorage "last-selected-clients" nil)
-                                   (.reload (.-location js/document ) true))}
+           [:a.button {:on-click (dispatch-event [::impersonate (:impersonate-jwt c)])}
             "Impersonate"]