wip, fixed styles

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; }

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