generated from coulomb/repo-seed
fix(WP-0014/A2): continued type-correctness fixes and Tailwind CSS output
- Schema.sql: add FK constraints for phases 6–12 so IHP generates Id X instead of UUID for FK columns (widget_adapter_specs, friction_scores, hub_routing_rules, agent_proposals, hub_capability_manifests, etc.) - HubHealth, ModelRouter, ApiInteractionEvents: remove toUUID() wrappers now that FK columns carry proper Id types - FederatedGovernance/Dashboard, HubRoutingRules/Index: same Id comparison fix - AgentProposals/Index, DecisionRecords/Index, ApiConsumers/Edit: Id type fixes - BottleneckDetector: add Data.Coerce import; CrossHubPropagation: add guard - ApiKeys: qualify cryptohash-sha256 import to resolve package ambiguity - WebhookDeliveryJob: use LBS.fromStrict; remove duplicate diffUTCTime - Sessions/New: use renderFlashMessages (IHP built-in) - ArchiveRecords/LineageInspector: simplify renderChainStep signature - static/app.css: Tailwind CSS output (2011 lines) — A3 confirmed - workplans/IHUB-WP-0015-local-deployment-intro-ui.md: add workplan Co-Authored-By: Claude Sonnet 4.6 <noreply@anthropic.com>
This commit is contained in:
@@ -97,7 +97,7 @@ renderRow widgets p = [hsx|
|
||||
</a>
|
||||
</td>
|
||||
<td class="px-4 py-3 text-gray-600">{widgetName widgets p.sourceWidgetId}</td>
|
||||
<td class="px-4 py-3">{renderConfidenceBar p.confidence}</td>
|
||||
<td class="px-4 py-3">{renderConfidenceBar (fmap realToFrac p.confidence)}</td>
|
||||
<td class="px-4 py-3">
|
||||
<span class={statusBadge p.status <> " text-xs px-2 py-0.5 rounded font-medium"}>
|
||||
{p.status}
|
||||
@@ -107,9 +107,9 @@ renderRow widgets p = [hsx|
|
||||
</tr>
|
||||
|]
|
||||
|
||||
widgetName :: [Widget] -> Maybe UUID -> Text
|
||||
widgetName :: [Widget] -> Maybe (Id Widget) -> Text
|
||||
widgetName _ Nothing = "—"
|
||||
widgetName widgets (Just wid) = maybe "(unknown)" (.name) (find (\w -> toUUID w.id == wid) widgets)
|
||||
widgetName widgets (Just wid) = maybe "(unknown)" (.name) (find (\w -> w.id == wid) widgets)
|
||||
|
||||
renderConfidenceBar :: Maybe Double -> Html
|
||||
renderConfidenceBar Nothing = [hsx|<span class="text-gray-300 text-xs">—</span>|]
|
||||
|
||||
Reference in New Issue
Block a user