summaryrefslogtreecommitdiff
path: root/Omni
diff options
context:
space:
mode:
Diffstat (limited to 'Omni')
-rw-r--r--Omni/Jr/Web.hs4
-rw-r--r--Omni/Jr/Web/Style.hs16
2 files changed, 18 insertions, 2 deletions
diff --git a/Omni/Jr/Web.hs b/Omni/Jr/Web.hs
index 6d0fa20..00e0c88 100644
--- a/Omni/Jr/Web.hs
+++ b/Omni/Jr/Web.hs
@@ -634,7 +634,7 @@ instance Lucid.ToHtml TaskDetailPage where
Just url ->
Lucid.div_ [Lucid.class_ "metric-row"] <| do
Lucid.span_ [Lucid.class_ "metric-label"] "Amp Thread:"
- Lucid.a_ [Lucid.href_ url, Lucid.target_ "_blank", Lucid.class_ "metric-value amp-link"] (Lucid.toHtml url)
+ Lucid.a_ [Lucid.href_ url, Lucid.target_ "_blank", Lucid.class_ "amp-thread-btn"] "View in Amp ↗"
case (TaskCore.activityStartedAt act, TaskCore.activityCompletedAt act) of
(Just start, Just end) ->
@@ -971,7 +971,7 @@ instance Lucid.ToHtml TaskMetricsPartial where
Just url ->
Lucid.div_ [Lucid.class_ "metric-row"] <| do
Lucid.span_ [Lucid.class_ "metric-label"] "Amp Thread:"
- Lucid.a_ [Lucid.href_ url, Lucid.target_ "_blank", Lucid.class_ "metric-value amp-link"] (Lucid.toHtml url)
+ Lucid.a_ [Lucid.href_ url, Lucid.target_ "_blank", Lucid.class_ "amp-thread-btn"] "View in Amp ↗"
case (TaskCore.activityStartedAt act, TaskCore.activityCompletedAt act) of
(Just start, Just end) ->
diff --git a/Omni/Jr/Web/Style.hs b/Omni/Jr/Web/Style.hs
index 9ec03d6..9910e65 100644
--- a/Omni/Jr/Web/Style.hs
+++ b/Omni/Jr/Web/Style.hs
@@ -529,6 +529,19 @@ executionDetailsStyles = do
textDecoration none
wordBreak breakAll
".amp-link" # hover ? textDecoration underline
+ ".amp-thread-btn" ? do
+ display inlineBlock
+ padding (px 4) (px 10) (px 4) (px 10)
+ backgroundColor "#7c3aed"
+ color white
+ borderRadius (px 3) (px 3) (px 3) (px 3)
+ textDecoration none
+ fontSize (px 12)
+ fontWeight (weight 500)
+ transition "background-color" (ms 150) ease (sec 0)
+ ".amp-thread-btn" # hover ? do
+ backgroundColor "#6d28d9"
+ textDecoration none
".retry-count" ? do
color "#f97316"
fontWeight (weight 600)
@@ -901,6 +914,9 @@ darkModeStyles =
".metric-label" ? color "#9ca3af"
".metric-value" ? color "#d1d5db"
".amp-link" ? color "#60a5fa"
+ ".amp-thread-btn" ? do
+ backgroundColor "#8b5cf6"
+ ".amp-thread-btn" # hover ? backgroundColor "#7c3aed"
".markdown-content" ? color "#d1d5db"
".commit-item" ? do
backgroundColor "#374151"