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