robur/builder-web
4
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Status checkmark: css cursor

Browse source
This commit is contained in:
Reynir Björnsson 2020-12-07 21:34:10 +01:00
parent 17570ebc76
commit 494d4eb215
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lib/views.ml
View file

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