 (defn table-block []
   (section
    "tables"
-   ["Tables" (d/small "table.cljs")]
+   ["Tables " (d/small "table.cljs")]
    (d/h3 "Example")
    (d/p "Use the "
         (d/code ":striped? true") ", "

(defn well-block []
  (section
   "wells"
   ["Wells" (d/small "random.cljs")]
   (d/p "Use the well as a simple effect on an element to give it an inset effect.")
   (d/h3 "Default Wells")
   (->example (slurp-example "well/basic"))

(defn glyphicon-block []
  (section
   "glyphicons"
   ["Glyphicons " (d/small "random.cljs")]
   (d/p "Use them in buttons, button groups for a toolbar, navigation,
   or prepended form inputs.")
   (d/h3 "Example")
