Clean up namespaces styling

TheAngryByrd · Feb 4, 2019 · eba46ae · eba46ae
1 parent 8dd9d9a
commit eba46ae
Show file tree

Hide file tree

Showing 3 changed files with 19 additions and 16 deletions.
diff --git a/Content/Library/docsSrc/templates/namespaces.fsx b/Content/Library/docsSrc/templates/namespaces.fsx
@@ -64,9 +64,13 @@ let generateNamespaceDocs (asm : AssemblyGroup) (props) =
             ]
         )
         |> Seq.collect id
-    div [] [
-        yield h1 [] [
-            str asm.Name
+    div [ Class "container-fluid py-3" ] [
+        div [ Class "row" ] [
+            div [ Class "col-12" ] [
+                yield h1 [] [
+                    str asm.Name
+                ]
+                yield! parts
+            ]
         ]
-        yield! parts
     ]
diff --git a/Content/Library/docsSrc/templates/partMembers.fsx b/Content/Library/docsSrc/templates/partMembers.fsx
@@ -23,20 +23,19 @@ let partMembers (header : string) (tableHeader : string) (members : #seq<Member>
         ]
 
         yield table [
-            Class "table table-bordered member-list"
+            Class "table"
         ] [
             thead [] [
                 tr [] [
-                    td [] [
+                    th [] [
                         str tableHeader
                     ]
 
-                    td [] [
+                    th [] [
                         str "Description"
                     ]
                 ]
             ]
-
             tbody [] [
                 for it in members do
                     let id = Guid.NewGuid().ToString()

diff --git a/Content/Library/docsSrc/templates/partNested.fsx b/Content/Library/docsSrc/templates/partNested.fsx
@@ -12,13 +12,13 @@ open FSharp.MetadataFormat
 let partNested (types : Type array) (modules : Module array) =
     [
         if types.Length > 0 then
-            yield table [] [
-                thead [Class "table table-bordered type-list"] [
+            yield table [ Class "table" ] [
+                thead [] [
                     tr [] [
-                        td [] [
+                        th [] [
                             str "Type"
                         ]
-                        td [] [
+                        th [] [
                             str "Description"
                         ]
                     ]
@@ -48,13 +48,13 @@ let partNested (types : Type array) (modules : Module array) =
                 ]
             ]
         if modules.Length > 0 then
-            yield table [] [
-                thead [Class "table table-bordered type-list"] [
+            yield table [ Class "table" ] [
+                thead [] [
                     tr [] [
-                        td [] [
+                        th [] [
                             str "Module"
                         ]
-                        td [] [
+                        th [] [
                             str "Description"
                         ]
                     ]