From 6775b9c377b5eb5bee403070d893304d9bcc035d Mon Sep 17 00:00:00 2001 From: oakes Date: Mon, 31 Mar 2014 20:10:00 -0400 Subject: [PATCH] Parse markdown in docstrings --- doclet/project.clj | 1 + doclet/src/clojure/play_clj_doclet/html.clj | 5 +++-- 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/doclet/project.clj b/doclet/project.clj index 520f2c0..1f068b9 100644 --- a/doclet/project.clj +++ b/doclet/project.clj @@ -2,6 +2,7 @@ :description "FIXME: write description" :dependencies [[hiccup "1.0.5"] [marginalia "0.7.1"] + [markdown-clj "0.9.41"] [org.clojure/clojure "1.6.0"]] :source-paths ["src/clojure"] :java-source-paths ["src/java"] diff --git a/doclet/src/clojure/play_clj_doclet/html.clj b/doclet/src/clojure/play_clj_doclet/html.clj index 4421d9e..84d9b71 100644 --- a/doclet/src/clojure/play_clj_doclet/html.clj +++ b/doclet/src/clojure/play_clj_doclet/html.clj @@ -1,6 +1,7 @@ (ns play-clj-doclet.html (:require [clojure.string :as string] - [hiccup.core :refer :all])) + [hiccup.core :refer :all] + [markdown.core :as m])) (defn param [[type-name param-name]] @@ -25,7 +26,7 @@ (for [group groups] [:div [:h2 {} (:name group)] - (:docstring group) + (m/md-to-html-string (:docstring group)) (for [[name items] (:java group)] [:div (when (not= (:name group) name)