diff --git a/src/CorpusAnalysis.purs b/src/CorpusAnalysis.purs index 03b4f68a04ce77b63445df76565bbe66be647705..32eb5f5d140fb35dd75705970fb2c3d33b7946e8 100644 --- a/src/CorpusAnalysis.purs +++ b/src/CorpusAnalysis.purs @@ -37,27 +37,23 @@ corpusAnalysisSpec = simpleSpec defaultPerformAction render ] ] , div [className "row"] - [ div [className "col-md-5"] [ div [className "jumbotron1", style {padding : "12px 0px 20px 12px"}] - [ p [] - [ i [className "fa fa-globe"] [] - , text "IS Tex" - ] - , p [] - [ i [className "fa fa-file-archive-o"] [] - , text "bisphenol + A OR bpa" - ] - , p [] - [ i [className "fa fa-calendar"] [] - , text "Sept. 11 2017, 10:59 am," - ] - , p [] - [ i [className "fa fa-user"] [] - , text "Authors (S): gargantext," - ] + [ div [ className "col-md-8 content"] + [ p [] [ i [className "fa fa-globe"] [] + , text " IsTex, PubMed, Hal" + ] + , p [] [ i [className "fab fa-searchengin"] [] + , text " Query: bisphenol + A OR bpa" + ] + ] + , div [ className "col-md-4 content"] + [ p [] [ i [className "fa fa-calendar"] [] + , text " Sept. 11 2017, 10:59 am" + ] + , p [] [ i [className "fa fa-user"] [] + , text " Author(s): gargantua" + ] + ] ] - ] - , div [className "col-md-6"] - [] ] ] diff --git a/src/NTree.purs b/src/NTree.purs index 6ede05d6fcd09b40600de45c0616139081cd396d..11a52dff5bec9f612d5d71b76129c0fc8a674434 100644 --- a/src/NTree.purs +++ b/src/NTree.purs @@ -40,8 +40,8 @@ toggleNode sid a = a myCorpus :: Int -> String -> NTree (Tuple String String) myCorpus n name = NNode n false name - [ NLeaf (Tuple "Facets" "#/docView") - , NLeaf (Tuple "Graph" "#/docView") + [ NLeaf (Tuple "Facets" "#/corpus") + , NLeaf (Tuple "Graph" "#/corpus") , NLeaf (Tuple "Dashboard" "#/userPage") ]