 
 ;; Transformers
 ;; -----------------------
-(defn search-toggle [nodes tf]
+(defn search-toggle
+  "A proof-of-concept.
+   Performs the requested transforms on the specified nodes and return the transformed nodes."
+  [nodes tf]
   (let [tf (if tf true false)]
     (liven nodes
            [:form#search] (en/set-attr :data-active tf)

      (search-toggle false)
      (en/emit*)
      (render)))

      (en/emit*)
      (render)))

;; admin is cool because it demonstrates threading with generic
;; transformation fns... but there's no caching of the template at any
;; step along the way. :(
;; Probably not the best long-term trade-off.
(defn admin [header greeting steps]
  (-> (liven "public/admin/index.html"
             (get-in selectors [:common :header]) (en/substitute header)
