                                :children [[example-number-icon example-index]
                                           [example-send-to-repl-button-label example-index example-map]]]
                        :on-click (handler-fn
-                                  (reset! showing? false)
+                                  (reset! showing-atom false)
                                   (dispatch [:send-to-console :cljs-console (:strings example-map)]))]]
-              [example-ui example-map]]])
-
-(defn build-examples-ui
+              [api-example example-map]]])
+
+(defn api-examples
   "Builds the UI for the symbol's examples. Wants a list of {:html ... :strings}."
-  [examples-map showing?]
+  [showing-atom examples-map]
   [v-box
    :size "0 1 auto"
    :children [

              [v-box
               :size "0 0 auto"
               :gap "2px"
               :children (map-indexed #(example-panel %1 %2 showing?) examples-map)]]])

(defn symbol-popover
  "A popover's body in which details of the given symbol will be shown."
  [showing? popover-position sym-doc-map]
  (let [{name :name
         full-name :full-name
         desc :description

                            :href (utils/symbol->clojuredocs-url rel)
                            :target "_blank"])]]])

(defn api-example
  "The (single) example, usually monospaced, html UI. Wants a map {:html ... :strings}."
  [example-map]
  {:pre [(:strings example-map) (:html example-map)]}
