← Back to task

Commit 63f38802

commit 63f3880245da640136902f443d0865c0ccfdc513
Author: Coder Agent <coder@agents.omni>
Date:   Wed Feb 18 14:02:50 2026

    Hard corners and more margin on card elements
    
    Remove border-radius from all card-like elements (.card, .task-card,
    .stat-card, .list-group, .comment-card, .description, .stats-section,
    .summary-section, .execution-section, .activity-section, .commit-item)
    for hard corners. Increase gap between task list items (2px -> 8px),
    stat grid items (6px -> 10px), and comment cards (8px -> 10px margin)
    for better visual breathing room. Badge and small interactive element
    radii are preserved.
    
    Task-Id: t-639

diff --git a/Omni/Task/Web/Style.hs b/Omni/Task/Web/Style.hs
index 26ccdc14..1f98bc23 100644
--- a/Omni/Task/Web/Style.hs
+++ b/Omni/Task/Web/Style.hs
@@ -110,11 +110,11 @@ layoutStyles = do
   ".stats-grid" ? do
     display grid
     Stylesheet.key "grid-template-columns" ("repeat(auto-fit, minmax(80px, 1fr))" :: Text)
-    Stylesheet.key "gap" ("6px" :: Text)
+    Stylesheet.key "gap" ("10px" :: Text)
   ".task-list" ? do
     display flex
     flexDirection column
-    Stylesheet.key "gap" ("2px" :: Text)
+    Stylesheet.key "gap" ("8px" :: Text)
   ".detail-row" ? do
     display flex
     flexWrap Flexbox.wrap
@@ -281,7 +281,7 @@ cardStyles = do
     <> ".review-actions"
     ? do
       backgroundColor WebStyle.cBgRaised
-      borderRadius WebStyle.radiusMd WebStyle.radiusMd WebStyle.radiusMd WebStyle.radiusMd
+      borderRadius (px 0) (px 0) (px 0) (px 0)
       padding (px 8) (px 12) (px 8) (px 12)
       border (px 1) solid WebStyle.cBorder
   ".review-actions" ? do
@@ -374,7 +374,7 @@ cardStyles = do
   ".description" ? do
     backgroundColor WebStyle.cBgRaised
     padding (px 8) (px 8) (px 8) (px 8)
-    borderRadius (px 2) (px 2) (px 2) (px 2)
+    borderRadius (px 0) (px 0) (px 0) (px 0)
     margin (px 0) (px 0) (px 0) (px 0)
     color WebStyle.cFg
     fontSize (px 13)
@@ -446,7 +446,7 @@ cardStyles = do
   ".legend-open" ? backgroundColor WebStyle.cBlue
   ".stats-section" ? do
     backgroundColor WebStyle.cBgRaised
-    borderRadius (px 2) (px 2) (px 2) (px 2)
+    borderRadius (px 0) (px 0) (px 0) (px 0)
     padding (px 8) (px 10) (px 8) (px 10)
     border (px 1) solid WebStyle.cBorder
   ".stats-row" ? do
@@ -468,7 +468,7 @@ cardStyles = do
     fontSize (px 13)
   ".summary-section" ? do
     backgroundColor WebStyle.cBgRaised
-    borderRadius (px 2) (px 2) (px 2) (px 2)
+    borderRadius (px 0) (px 0) (px 0) (px 0)
     padding (px 8) (px 10) (px 8) (px 10)
     border (px 1) solid WebStyle.cBorder
   ".no-commit-msg" ? do
@@ -490,7 +490,7 @@ listGroupStyles = do
     display flex
     flexDirection column
     backgroundColor WebStyle.cBgRaised
-    borderRadius WebStyle.radiusMd WebStyle.radiusMd WebStyle.radiusMd WebStyle.radiusMd
+    borderRadius (px 0) (px 0) (px 0) (px 0)
     border (px 1) solid WebStyle.cBorder
     overflow hidden
   ".list-group-item" ? do
@@ -994,7 +994,7 @@ executionDetailsStyles = do
   ".execution-section" ? do
     marginTop (em 1)
     backgroundColor WebStyle.cBgRaised
-    borderRadius (px 2) (px 2) (px 2) (px 2)
+    borderRadius (px 0) (px 0) (px 0) (px 0)
     padding (px 8) (px 10) (px 8) (px 10)
     border (px 1) solid WebStyle.cBorder
   ".execution-details" ? do
@@ -1077,7 +1077,7 @@ activityTimelineStyles = do
   ".activity-section" ? do
     marginTop (em 1)
     backgroundColor WebStyle.cBgRaised
-    borderRadius (px 2) (px 2) (px 2) (px 2)
+    borderRadius (px 0) (px 0) (px 0) (px 0)
     padding (px 8) (px 10) (px 8) (px 10)
     border (px 1) solid WebStyle.cBorder
   ".activity-timeline" ? do
@@ -1172,7 +1172,7 @@ commitStyles = do
   ".commit-item" ? do
     padding (px 6) (px 8) (px 6) (px 8)
     backgroundColor WebStyle.cBgRaised
-    borderRadius (px 2) (px 2) (px 2) (px 2)
+    borderRadius (px 0) (px 0) (px 0) (px 0)
     border (px 1) solid WebStyle.cBorderSubtle
   ".commit-header" ? do
     display flex
@@ -1327,9 +1327,9 @@ commentStyles = do
   ".comment-card" ? do
     backgroundColor WebStyle.cBgRaised
     border (px 1) solid WebStyle.cBorderSubtle
-    borderRadius (px 4) (px 4) (px 4) (px 4)
+    borderRadius (px 0) (px 0) (px 0) (px 0)
     padding (px 10) (px 12) (px 10) (px 12)
-    marginBottom (px 8)
+    marginBottom (px 10)
   ".comment-text" ? do
     margin (px 0) (px 0) (px 6) (px 0)
     fontSize (px 13)
diff --git a/Omni/Web/Style.hs b/Omni/Web/Style.hs
index b5f7b8dd..41c8d5fe 100644
--- a/Omni/Web/Style.hs
+++ b/Omni/Web/Style.hs
@@ -343,7 +343,7 @@ cardStyles = do
   ".card" ? do
     backgroundColor cBgRaised
     border (px 1) solid cBorder
-    borderRadius radiusMd radiusMd radiusMd radiusMd
+    borderRadius (px 0) (px 0) (px 0) (px 0)
     padding (px 8) (px 16) (px 8) (px 16)
   ".card-link" ? do
     display block