[OCaml] High Intensity Training Online
refactor order workout card details
Show performance evidence before metadata and actions. Remove the redundant upcoming-workout explanation because the caption already states its status and date.
Changed files
lib/presenter/page_kit.ml
@@ -119,7 +119,4 @@
119
119
(List.map
120
120
(fun group -> tag "tbody" [] (rows_of_group group))
121
121
planned.groups);
122
Removed:
tag "p"
123
Removed:
[ class_ "latest-observation-note" ]
124
Removed:
[ Dream_html.txt "Latest performance is the record to beat." ];
125
122
]
lib/presenter/pages_logbook.ml
@@ -276,9 +276,10 @@
276
276
[ class_ "selected-workout" ]
277
277
(imported
278
278
@ [
279
Added:
tag "div" [ class_ "selected-workout-panel" ] performance;
279
280
workout_metadata entry;
280
Removed:
tag "div" [ class_ "selected-workout-panel" ] (performance @ actions);
281
Removed:
])
281
Added:
]
282
Added:
@ actions)
282
283
283
284
let selected_upcoming_card = upcoming_workout_card
284
285