        :handler (fn [data]
                   ;eset! visibility-atom new-value)
                   (when (= (:status data) "success")
-                    (init-settings badgeid state init-data "settings"))
+                    (show-settings-dialog badgeid state init-data "settings")
+                    #_(init-settings badgeid state init-data "settings"))
                   )})))
 
 (defn set-page-visibility-to-private [page-id]

      { :params {:user_badge_id (:id data)}
        :handler (fn [r]
                   (when (= "success" (:status r))
                     (init-settings (:id data) state init-data "settings")))})))


(defn init-resources [key resource-atom]

                               :mime_type mime_type}}
           :handler (fn [resp]
                      (when (= "success" (:status resp))
                        (show-settings-dialog (:id data) state init-data "settings")
                        #_(init-settings (:id data) state init-data "settings")))})))))

;;;;

