                             :cell-fn (comp datetime/as-time-since :uploaded_at)}
                            {:header "Remove"
                             :type #{:shrink :right}
-                            :cell-fn #(om/build remove-p12-button %)}]}))))
+                            :cell-fn (fn [key]
+                                       (om/build remove-action-button
+                                                 {:confirmation-question
+                                                  (str
+                                                   "Are you sure you want to remove the \""
+                                                   (:description key)
+                                                   "\" Apple Code Signing Key?")
+
+                                                  :remove-fn
+                                                  #(raise! owner
+                                                           [:delete-p12
+                                                            (select-keys key [:project-name :vcs-type :id])])}))}]}))))
 
 (defn no-keys-empty-state [{:keys [project-name add-key]} owner]
   (reify

            [frontend.components.pieces.button :as button]
            [frontend.components.pieces.card :as card])
  (:require-macros [frontend.utils :refer [html]]))

(defn branch-names [project-data]
  (map (comp gstring/urlDecode name) (keys (:branches (:project project-data)))))

           [:hr]
           (clear-cache-button "source" project-data owner)]]]))))

(defn env-vars [project-data owner]
  (reify
    om/IInitState
