Commit 649241d8 authored by James Laver's avatar James Laver

quieten css warnings

parent f77bcd0e
......@@ -545,7 +545,7 @@ toHtml d s@(NTree (LNode {id, name, nodeType}) ary) n = R.createElement el {} []
, H.a { href: if nodeType == Phylo then (toUrl Static nodeType (Just id))
else (toUrl Front nodeType (Just id))
, target : if nodeType == Phylo then "blank" else ""
, style: {"margin-left": "22px"}
, style: {marginLeft: "22px"}
, onClick: mkEffectFn1 $ (\e -> d $ CurrentNode id)
}
[ nodeText s n ]
......
......@@ -313,7 +313,7 @@ specOld = fold [treespec treeSpec, graphspec $ simpleSpec performAction render']
render' :: Render State {} Action
render' d _ (State st@{sigmaSettings, graphData: GraphData {sides,metaData }}) _ =
[ div [className "container-fluid", style {"padding-top" : "90px" }]
[ div [className "container-fluid", style {paddingTop : "90px" }]
[ {-div [ className "row"]
[ h2 [ style {textAlign : "center", position : "relative", top: "-1px"}]
[-- : MetaData {title}
......@@ -324,7 +324,7 @@ specOld = fold [treespec treeSpec, graphspec $ simpleSpec performAction render']
text "Title"
]
]
, -} div [className "row", style {"padding-bottom" : "10px", marginTop : "-24px"}]
, -} div [className "row", style {paddingBottom : "10px", marginTop : "-24px"}]
[
div [className "col-md-4"]
[
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment