aboutsummaryrefslogtreecommitdiff
path: root/contrib/xml/xmlcommand.ml
diff options
context:
space:
mode:
Diffstat (limited to 'contrib/xml/xmlcommand.ml')
-rw-r--r--contrib/xml/xmlcommand.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/xml/xmlcommand.ml b/contrib/xml/xmlcommand.ml
index 38c270db5a..feaf1b8087 100644
--- a/contrib/xml/xmlcommand.ml
+++ b/contrib/xml/xmlcommand.ml
@@ -430,7 +430,7 @@ let theory_buffer = Buffer.create 4000;;
let theory_output_string ?(do_not_quote = false) s =
(* prepare for coqdoc post-processing *)
- let s = if do_not_quote then s else "(** #"^s^"\n#*)\n" in
+ let s = if do_not_quote then s else "(** ^"^s^"\n^*)\n" in
print_if_verbose s;
Buffer.add_string theory_buffer s
;;