     (fn []
       [:ul {:class "phones"}
        (for [phone (filter (partial matches-query? @search-input) @phones)]
-         ^{:key phone} [phone-component phone])])))
+         ^{:key (:name phone)} [phone-component phone])])))
 
 (defn search-component
   []

;; Re-frame data

(re-frame/register-sub
  :search-input
  (fn [db]
    (reaction (:search-input @db))))

(re-frame/register-sub        ;; a new subscription handler
 :phones             ;; usage (subscribe [:phones])

(defn phone-component
  [phone]
  [:li
   [:span (:name phone)]
   [:p (:snippet phone)]])

(defn matches-query?
  [search-input phone]
