                                   (.preventDefault %)
                                   (swap! state assoc :tab [se/settings-tab-content (dissoc data :evidence) state init-data]
                                          :tab-no 2))}
-          (t :core/Cancel)]]]]]])))
+          (t :core/Cancel)]]]]]]))
 
 (defn evidence-list [data state init-data]
   (let [evidence-name-atom (cursor state [:evidence :name])

         message (cursor state [:evidence :message])
         input-mode (cursor state [:input_mode])
         {:keys [image_file name]} data]
    (fn []

    [:div {:id "badge-settings" :class "row flip"}
     [:div {:class "col-md-3 badge-image modal-left"}

                                :tab [evidence-form data state init-data]
                                :tab-no 2)
                         #_(swap! state assoc :tab [evidence-form data state init-data] :tab-no 2))} (t :badge/Addnewevidence)]]]
     #_(when-not (empty? (:evidences data)) [:div.form-group
                                           [:div.col-md-12 [evidence-list data state init-data]]])]))

(defn evidence [data state init-data]
