[enhance] markdown: un-private help xhtml and string for external usage

MLstate · Nov 17, 2011 · 02e9f2e · 02e9f2e
1 parent 07109e0
commit 02e9f2e
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/stdlib/tools/markdown/markdown.opa b/stdlib/tools/markdown/markdown.opa
@@ -443,7 +443,7 @@ Markdown = {{
     main = generic_multiple(elt, (t->{text=t}))
     Parser.parse(main,src):Markdown.private.content
 
-  @private help_string = "
+  help_string = "
 You can enter a message using a Markdown-like syntax.
 Here is a list of all elements recognized.
 
@@ -638,7 +638,7 @@ with a linebreak
 
 "
 
-  @private help_xhtml = xhtml_of_string(default_options, help_string)
+  help_xhtml = xhtml_of_string(default_options, help_string)
 
   @private @client toggle_help(src_id, res_id)(_) =
     do Dom.toggle(#{src_id})