      :line-name "Carbon Monoxide"
      :selected? false}
     ]
-   :app/customers
-   [{:id 200
-     :first-name "Greg"}
-    {:id 201
-     :first-name "Sally"}
-    {:id 202
-     :first-name "Ben"}
-    ]
    }
   )
 

  (let [st @state]
    {:value (om/db->tree query (get st key) st)}))

(comment
  (defmethod read :fake-graph/by-id
    [{:keys [state query]} key _]
    (let [st @state]
      {:value (om/db->tree query (get st key) st)})))

(defn update-graph-lines [st want-to-select? id]
  (let [graph-lines [:fake-graph/by-id 1000 :graph/graph-lines]]
    (if want-to-select?

      (pprint st)
      (db-format/show-hud check-result))))

;; This component isn't essential - we could have used Checkbox in FakeGraph
;; They both have the same ident
(defui Line
  static om/Ident
  (ident [this props]
    [:line/by-id (:id props)])
  static om/IQuery
  (query [this]
    [:id :line-name]))

(defui Checkbox
  static om/Ident
