Improved rendering of conjectures

[helm.git] / helm / ocaml / content_pres / box.ml

diff --git a/helm/ocaml/content_pres/box.ml b/helm/ocaml/content_pres/box.ml
index 8b992e0416194867eebbb8f7984e38fd91e34cfb..7c50692621d99ff3fcff497209ce81c64193924d 100644 (file)
--- a/helm/ocaml/content_pres/box.ml
+++ b/helm/ocaml/content_pres/box.ml
@@ -120,6 +120,7 @@ let b_object b = Object ([],b)
 let b_indent = indent
 let b_space = Space [None, "width", "0.5em"]
 let b_kw = b_text (RenderingAttrs.object_keyword_attributes `BoxML)
+let b_toggle items = Action ([ None, "type", "toggle"], items)
 
 let pp_attr attr =
   let pp (ns, n, v) =