Merge similar symbols

2014-03-31 14:10:22 -04:00
parent 1cc40a3b32
commit baeaca0af6
2 changed files with 14 additions and 6 deletions
--- a/doclet/src/clojure/play_clj_doclet/html.clj
+++ b/doclet/src/clojure/play_clj_doclet/html.clj
@@ -16,14 +16,12 @@
    [:b (str name)]
    " "
    (string/join ", " (map param args))]
-   (when text
-     [:i text])])
+   (when text [:i text])])

 (defn create-from-file
  [{:keys [ns groups] :as parsed-file}]
  [:div
-   (when (and ns (> (count groups) 0))
-     [:h1 ns])
+   (when ns [:h1 ns])
   (for [group groups]
     [:div
      [:h2 {} (:name group)]