               :initial-width 132 :resizable? false
               :column-data column-data
               :sort-by (zipmap access-levels (range)) :sort-initial :asc
-              :render (fn [data]
-                        (let [access-level (:access-level data)]
-                          [:div {:style {:paddingLeft 14}}
-                           (if (= access-level "NO ACCESS")
-                             (style/create-link {:text (prettify access-level)
-                                                 :onClick #(modal/push-modal
-                                                            [RequestAuthDomainAccessDialog
-                                                             {:workspace-id (:workspace-id data)
-                                                              :ws-auth-domains (:auth-domains data)}])})
-                             (prettify access-level))]))}])
+              :render (fn [{:keys [access-level workspace-id auth-domains]}]
+                        [:div {:style {:paddingLeft 14}}
+                         (if (= access-level "NO ACCESS")
+                           (style/create-link {:text (prettify access-level)
+                                               :onClick #(push-request-access-modal workspace-id auth-domains)})
+                           (prettify access-level))])}])
           :behavior {:reorderable-columns? false}
           :style {:header-row {:color (:text-lighter style/colors) :fontSize "90%"}
                   :header-cell {:padding "0.4rem 0"}

                                                :onClick #(swap! state update :filters-expanded? not)})]
                           [:div {:style {:clear "both"}}]
                           (when filters-expanded?
                             (this :-side-filters))]}
         :paginator {:style {:clear "both"}}}]))
   :component-did-update
   (fn [{:keys [state]}]
     (persistence/save {:key persistence-key :state state}))
   :-side-filters
   (fn [{:keys [state refs locals]}]
     (let [{:keys [filters]} @state]
       (apply

        (let [{:keys [my-auth-domains ws-instructions error]} @state]
          (cond
            (not (or (and my-auth-domains ws-instructions) error))
            [comps/Spinner {:text "Loading Authorization Domains..."}]
            error
            (case (:code error)
              (:unknown :parse-error)
