            :licence  (str (upper-case (replace (session/get :site-name) #"\s" "")) "-" id)
            :url      (str (session/get :site-url) (path-for (str "/badge/info/" id)))
            :datefrom issued_on
-           :dateto   expires_on}]])]]))
-
-(defn settings-tab-content [{:keys [id name image_file issued_on expires_on show_evidence revoked rating]} state init-data badgeinfo?]
+           :dateto   expires_on}]]
+      ]]))
+
+(defn settings-tab-content [{:keys [id name image_file issued_on expires_on show_evidence revoked rating]} state init-data]
   (let [expired? (bh/badge-expired? expires_on)
         show-recipient-name-atom (cursor state [:show_recipient_name])
         notifications-atom (cursor state [:receive-notifications])

                     :type            "radio"
                     :on-change       #(do
                                         (set-visibility "internal" state)
                                         (save-settings state init-data))
                     :default-checked (= "internal" (get-in @state [:badge-settings :visibility]))}]
       [:i {:class "fa fa-group" }]
       [:label {:for "visibility-internal"}

                 :rating       (if (pos? rating) rating nil)
                 :evidence-url evidence_url}
       :handler (fn []
                  (if (= "share" context)
                    (update-settings id state)
                    (init-data state id nil)))})))


(defn toggle-recipient-name [id show-recipient-name-atom]
  (let [new-value (not @show-recipient-name-atom)]
