 ;; ------------------------------------------------------------------------------------
 
 (defn spinner
+  "Render an animated gif spinner"
   []
-  "Render an animated gif spinner"
+
   [:div {:style {:display "flex"
                  :flex    "none"
                  :margin "10px"}}



(defn label
  [& {:keys [label style class on-click]
      :as   args}]
  {:pre [(superset? label-args (keys args))]}
  "Returns markup for a basic label"
  [:span
   (merge
     {:class (str "rc-label " class)



(defn radio-button
  "I return the markup for a radio button, with an optional RHS label."
  [& {:keys [model value label on-change disabled style label-class label-style]
      :as   args}]
  {:pre [(superset? radio-button-args (keys args))]}

  (let [model       (deref-or-value model)
        disabled    (deref-or-value disabled)
        callback-fn (if (and on-change (not disabled)) #(on-change value))]
