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

            [salava.core.time :refer [date-from-unix-time]]
            [clojure.string :refer [blank? includes? split trim starts-with?]]
            [salava.file.icons :refer [file-icon]]
            [salava.file.ui.my :refer [send-file]]))

(defn url? [s]
  (when-not (blank? s)

           :show-preview false
           :show-form false
           :evidence nil)))

(defn show-settings-dialog [badge-id state init-data context]
  (ajax/GET
    (path-for (str "/obpv1/badge/settings/" badge-id) true)
    {:handler (fn [data]
                (swap! state assoc :badge-settings data (assoc data :new-tag ""))
                (if (= context "settings")
                  (swap! state assoc :tab [se/settings-tab-content data state init-data]
                         :tab-no 2
                         :evidences (:evidences data))
                  (swap! state assoc :tab [se/share-tab-content data state init-data]
                         :tab-no 3)))}))

(defn delete-evidence! [id data state init-data]
  (let [init-settings (first (plugin-fun (session/get :plugins) "modal" "show_settings_dialog"))]
