From 1f4aa22156aa6cdf61f9bd18a2e5929ee938900d Mon Sep 17 00:00:00 2001
From: Dmitry Zuikov <dzuikov@gmail.com>
Date: Mon, 22 Apr 2024 07:57:58 +0300
Subject: [PATCH] wip, fixed styles

---
 .../assets/css/custom.css                     | 23 ++++++++++++-------
 .../src/HBS2/Git/Web/Html/Root.hs             | 10 +++-----
 2 files changed, 18 insertions(+), 15 deletions(-)

diff --git a/hbs2-git/hbs2-git-dashboard-assets/assets/css/custom.css b/hbs2-git/hbs2-git-dashboard-assets/assets/css/custom.css
index 8683c990..4637d2a6 100644
--- a/hbs2-git/hbs2-git-dashboard-assets/assets/css/custom.css
+++ b/hbs2-git/hbs2-git-dashboard-assets/assets/css/custom.css
@@ -326,12 +326,14 @@ td.tree-locator span {
   margin-right: .5rem;
 }
 
-tr.commit-brief-title td,th {
+tr.commit-brief-title td,
+tr.commit-brief-title th {
   border-bottom: none;
-  align: top;
+  vertical-align: top;
 }
 
-tr.commit-brief-details td,th {
+tr.commit-brief-details td,
+tr.commit-brief-details th {
   border-top: none;
 }
 
@@ -339,19 +341,24 @@ td.commit-brief-title {
   background-color:
 }
 
-tr.commit-brief-last  td,th {
+tr.commit-brief-last  td {
   border: none;
 }
 
+tr.commit-brief-last  th {
+  border: none;
+}
+
+
 pre > code.sourceCode { white-space: pre; position: relative; }
 pre > code.sourceCode > span { line-height: 1.25; }
 pre > code.sourceCode > span:empty { height: 1.2em; }
-.sourceCode { overflow: visible; }
-code.sourceCode > span { color: inherit; text-decoration: inherit; }
-div.sourceCode { margin: 1em 0; }
+.sourceCode { overflow: auto; }
+code.sourceCode > span { color: inherit; text-decoration: inherit; overflow: auto; }
+div.sourceCode { margin: 1em 0; overflow: auto; }
 pre.sourceCode { margin: 0; }
 @media screen {
-div.sourceCode { overflow: auto; }
+div.sourceCode { overflow: auto; max-width: 120rem; }
 }
 @media print {
 pre > code.sourceCode { white-space: pre-wrap; }
diff --git a/hbs2-git/hbs2-git-dashboard/src/HBS2/Git/Web/Html/Root.hs b/hbs2-git/hbs2-git-dashboard/src/HBS2/Git/Web/Html/Root.hs
index 7d5aa37b..d9f89d2d 100644
--- a/hbs2-git/hbs2-git-dashboard/src/HBS2/Git/Web/Html/Root.hs
+++ b/hbs2-git/hbs2-git-dashboard/src/HBS2/Git/Web/Html/Root.hs
@@ -440,10 +440,10 @@ repoBlob lww co tree BlobInfo{..} = do
           span_ $ toHtml (show $ pretty blobName)
 
 
-  table_ [] do
+  table_ [class_ "item-attr"] do
     tr_ do
       th_ $ strong_ "hash"
-      td_ [colspan_ "8"] do
+      td_ [colspan_ "7"] do
         span_ [class_ "mono"] $ toHtml $ show $ pretty blobHash
 
     tr_ do
@@ -453,11 +453,7 @@ repoBlob lww co tree BlobInfo{..} = do
       th_ $ strong_ "size"
       td_ $ toHtml $ show $ pretty blobSize
 
-      th_ $ none
-      td_ $ none
-
-      th_ $ none
-      td_ $ none
+      td_ [colspan_ "3"] mempty
 
 
   let fallback _ = mempty