summaryrefslogtreecommitdiff
path: root/Omni/Jr
diff options
context:
space:
mode:
Diffstat (limited to 'Omni/Jr')
-rw-r--r--Omni/Jr/Web.hs4
-rw-r--r--Omni/Jr/Web/Style.hs13
2 files changed, 13 insertions, 4 deletions
diff --git a/Omni/Jr/Web.hs b/Omni/Jr/Web.hs
index a4fdee1..bed26a6 100644
--- a/Omni/Jr/Web.hs
+++ b/Omni/Jr/Web.hs
@@ -1838,8 +1838,8 @@ instance Lucid.ToHtml DescriptionEditPartial where
Lucid.div_ [Lucid.id_ "description-block", Lucid.class_ "description-block editing"] <| do
Lucid.div_ [Lucid.class_ "description-header"] <| do
Lucid.h3_ (if isEpic then "Design" else "Description")
- Lucid.a_
- [ Lucid.href_ "#",
+ Lucid.button_
+ [ Lucid.type_ "button",
Lucid.class_ "cancel-link",
Lucid.makeAttribute "hx-get" ("/tasks/" <> tid <> "/description/view"),
Lucid.makeAttribute "hx-target" "#description-block",
diff --git a/Omni/Jr/Web/Style.hs b/Omni/Jr/Web/Style.hs
index 6399f2f..0628c53 100644
--- a/Omni/Jr/Web/Style.hs
+++ b/Omni/Jr/Web/Style.hs
@@ -406,7 +406,13 @@ cardStyles = do
".edit-link" <> ".cancel-link" ? do
fontSize (px 12)
color "#0066cc"
- ".cancel-link" ? color "#dc2626"
+ "button.cancel-link" ? do
+ color "#dc2626"
+ backgroundColor transparent
+ border (px 0) solid transparent
+ padding (px 0) (px 0) (px 0) (px 0)
+ cursor pointer
+ textDecoration underline
".diff-block" ? do
maxHeight (px 600)
overflowY auto
@@ -1423,7 +1429,10 @@ darkModeStyles =
".edit-description" ? borderTopColor "#374151"
(".edit-description" |> "summary") ? color "#60a5fa"
".edit-link" ? color "#60a5fa"
- ".cancel-link" ? color "#f87171"
+ "button.cancel-link" ? do
+ color "#f87171"
+ backgroundColor transparent
+ border (px 0) solid transparent
".description-textarea" ? do
backgroundColor "#374151"
borderColor "#4b5563"