Browse files

keep describe-markdown private for now

  • Loading branch information...
1 parent 2124e13 commit c0f266d7399a82b8c2d143af19d1d167b578f914 @cemerick cemerick committed Nov 21, 2012
@@ -139,10 +139,13 @@
(apply str (for [[k v] msg-slot-docs]
(format "* `%s` %s\n" (pr-str k) (markdown-escape v)))))
-(defn describe-markdown
+(defn- describe-markdown
"Given a message containing the response to a verbose :describe message,
generates a markdown string conveying the information therein, suitable for
-use in e.g. wiki pages, github, etc."
+use in e.g. wiki pages, github, etc.
+(This is currently private because markdown conversion surely shouldn't
+be part of the API here...?)"
[{:keys [ops versions]}]
(apply str "# Supported nREPL operations
@@ -40,4 +40,4 @@
"<!-- This file is *generated* by " #'update-op-docs
"\n **Do not edit!** -->\n"
- (middleware/describe-markdown describe-response)))))
+ (#'middleware/describe-markdown describe-response)))))

0 comments on commit c0f266d

Please sign in to comment.