diff options
Diffstat (limited to 'Omni/Jr/Web/Partials.hs')
| -rw-r--r-- | Omni/Jr/Web/Partials.hs | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/Omni/Jr/Web/Partials.hs b/Omni/Jr/Web/Partials.hs index 25a4d1e..2660441 100644 --- a/Omni/Jr/Web/Partials.hs +++ b/Omni/Jr/Web/Partials.hs @@ -18,6 +18,7 @@ import Numeric (showFFloat) import Omni.Jr.Web.Components ( aggregateCostMetrics, commentForm, + complexityBadgeWithForm, formatCostHeader, formatTokensHeader, metaSep, @@ -33,6 +34,7 @@ import Omni.Jr.Web.Components ) import Omni.Jr.Web.Types ( AgentEventsPartial (..), + ComplexityBadgePartial (..), DescriptionEditPartial (..), DescriptionViewPartial (..), PriorityBadgePartial (..), @@ -92,6 +94,11 @@ instance Lucid.ToHtml PriorityBadgePartial where toHtml (PriorityBadgePartial priority tid) = priorityBadgeWithForm priority tid +instance Lucid.ToHtml ComplexityBadgePartial where + toHtmlRaw = Lucid.toHtml + toHtml (ComplexityBadgePartial complexity tid) = + complexityBadgeWithForm complexity tid + instance Lucid.ToHtml TaskListPartial where toHtmlRaw = Lucid.toHtml toHtml (TaskListPartial tasks) = |