Status checkmark: css cursor

This commit is contained in:
Reynir Björnsson 2020-12-07 21:34:10 +01:00
parent 17570ebc76
commit 494d4eb215

View file

@ -7,13 +7,13 @@ let check_icon result =
match result with
| Builder.Exited 0 ->
span ~a:[
a_style "color: green;";
a_style "color: green; cursor: pointer;";
a_titlef "%a" Builder.pp_execution_result result;
]
[txt ""]
| _ ->
span ~a:[
a_style "color: red;";
a_style "color: red; cursor: pointer;";
a_titlef "%a" Builder.pp_execution_result result;
]
[txt ""]