 (defn $number-badge [num]
   [:span.badge num])
 
-(defn $var-header [{:keys [ns name added arglists] :as v}]
+(defn $var-header [{:keys [ns name added arglists forms] :as v}]
   [:div.row.var-header
    [:div.col-sm-8
     [:h1.var-name (util/html-encode name)]]

        (when-not (empty? a) " ")
        a
        ")")])

(defn see-alsos-for [{:keys [ns name library-url]}]
  (->> (mon/fetch :see-alsos

   [:div.col-sm-12
    [:section
     [:ul.arglists
      (if forms
        (map #($argform %) forms)
        (map #($arglist name %) arglists))]]]])

(defn var-page-handler [ns name]
  (let [name (util/cd-decode name)
