summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ocamldoc/odoc_latex.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/ocamldoc/odoc_latex.ml b/ocamldoc/odoc_latex.ml
index c58e2130e..b3aad01ff 100644
--- a/ocamldoc/odoc_latex.ml
+++ b/ocamldoc/odoc_latex.ml
@@ -121,7 +121,7 @@ class text =
let buf = Buffer.create len in
for i = 0 to len - 1 do
match name.[i] with
- '_' -> if no_ then () else Buffer.add_char buf '_'
+ '_' -> if no_ then Buffer.add_string buf "!!!!" else Buffer.add_char buf '_'
| '~' -> if no_ then () else Buffer.add_char buf '~'
| '%' -> Buffer.add_string buf (if no_ then "percent" else "%")
| '@' -> Buffer.add_string buf "\"@"