    (fn [{:keys [state]}]
      (utils/ajax-orch
       "/groups"
-      {:on-done (net/handle-ajax-response #(swap! state assoc
-                                                  :groups-response %
-                                                  :deleting? nil
-                                                  :delete-response nil))}))
+      {:on-done (net/handle-ajax-response #(swap! state assoc :groups-response %))}))
    :-render-groups-table
    (fn [{:keys [this state]}]
      [Table

     [:div {}
      (cond
        (:delete-modal? @state)
        (modals/render-message
         {:text (str "Are you sure you want to delete the group " (:group-name @state) "?")
          :on-confirm #(this :-delete-group)
          :on-dismiss #(swap! state dissoc :delete-modal?)})
        (:deleting? @state)
        (net/render-with-ajax
         (:delete-response @state)
         #(this :-load-data)
         {:blocking? true
          :loading-text "Deleting group..."
          :handle-error
          (fn [parsed-response]
            (modals/render-error
             {:text (if (= 409 (:statusCode parsed-response))
                      "This group cannot be deleted because it is in use."
                      (:message parsed-response))
              :on-dismiss #(swap! state dissoc :deleting? :delete-response)}))}))
      (net/render-with-ajax
       (:groups-response @state)
       #(this :-render-groups-table)

     (endpoints/call-ajax-orch
      {:endpoint (endpoints/delete-group (:group-name @state))
       :on-done (net/handle-ajax-response
                 (fn [response]
                    (swap! state assoc :delete-response response)
                    (this :-load-data)))}))
   :-render-confirmation
   (fn [{:keys [state this]}]
     (modals/render-message
      {:text (str "Are you sure you want to delete the group " (:group-name @state) "?")
       :on-confirm #(this :-delete-group)
       :on-dismiss #(swap! state dissoc :delete-modal?)}))
   :-render-deletion-actions
   (fn [{:keys [state this]}]
     (net/render-with-ajax
      (:delete-response @state)
      (constantly nil)
      {:blocking? true
       :loading-text "Deleting group..."
       :handle-error
       (fn [parsed-response]
         (modals/render-error
          {:text (if (= 409 (:statusCode parsed-response))
                   "This group cannot be deleted because it is in use."
                   (:message parsed-response))
           :on-dismiss #(swap! state dissoc :deleting? :delete-response)}))}))})

(react/defc- Page
  {:render
