init.ml
This commit is contained in:
@ -62,7 +62,7 @@ let setup_workspace ~container cstore : unit Lwt.t =
|
|||||||
appendchild ~container
|
appendchild ~container
|
||||||
Tyxml_js.Html.(
|
Tyxml_js.Html.(
|
||||||
a
|
a
|
||||||
~a:[ a_class [ "window" ] ]
|
~a:[ a_class Html_types.[ "window" ] ]
|
||||||
[
|
[
|
||||||
div ~a:[ a_class [ "status" ] ] [ txt status ];
|
div ~a:[ a_class [ "status" ] ] [ txt status ];
|
||||||
div
|
div
|
||||||
|
|||||||
Reference in New Issue
Block a user