Skip to content

P
purescript-gargantext
Commit 59b1f7a1 authored by Abinaya Sudhir's avatar Abinaya Sudhir
Browse files
Options

Layout fixed

parent 387aceb0
Hide whitespace changes
Inline Side-by-side
Showing with 28 additions and 27 deletions
dist/index.html
View file @ 59b1f7a1
......@@ -17,6 +17,7 @@
position: relative;
padding-left: 5px;
}
.tree { margin-top : 125px;}
.tree ul li::before {
content: " ";
position: absolute;
......
src/AddCorpusview.purs
View file @ 59b1f7a1
......@@ -87,7 +87,7 @@ performAction GO _ _ = void do
layoutModal :: forall e. { response :: Array Response | e} -> Array ReactElement
layoutModal state =
layoutModal state =
[button [ _type "button"
, _data { "toggle" : "modal"
, "target" : ".myModal"
......@@ -95,7 +95,7 @@ layoutModal state =
][text "Launch modal"]
, div [ className "modal fade myModal"
, role "dialog"
, _data {show : true}
, _data {show : true}
][ div [ className "modal-dialog"
, role "document"
] [ div [ className "modal-content"]
......@@ -107,14 +107,14 @@ layoutModal state =
, button [ _type "button"
, className "close"
, _data { dismiss : "modal"}
] [ span [ aria {hidden : true}]
] [ span [ aria {hidden : true}]
[ text "X"]
]
]
, div [ className "modal-body"]
[ ul [ className "list-group"] ( map fn1 state.response ) ]
, div [className "modal-footer"]
[ button [ _type "button"
, className "btn btn-secondary"
......@@ -142,8 +142,8 @@ layoutAddcorpus = simpleSpec performAction render
render :: Render State props Action
render dispatch _ state _ =
[
div [className "container"] []
, div [className "container"]
div [className "container1"] []
, div [className "container1"]
[
div [className "jumbotron"]
[ div [className "row"]
......
src/AnnotationDocumentView.purs
View file @ 59b1f7a1
......@@ -45,7 +45,7 @@ docview = simpleSpec performAction render
render :: Render State _ Action
render dispatch _ state _ =
[
div [className "container"]
div [className "container1"]
[
div [className "row"]
[
......
src/DocView.purs
View file @ 59b1f7a1
......@@ -102,7 +102,7 @@ layoutDocview = simpleSpec performAction render
where
render :: Render State _ Action
render dispatch _ state@(TableData d) _ =
[ div [className "container"]
[ div [className "container1"]
[ div [className "row"]
[ div [className "col-md-3"]
[ br' []
......
src/Landing.purs
View file @ 59b1f7a1
......@@ -40,8 +40,8 @@ data Action
performAction :: forall eff props. PerformAction ( console :: CONSOLE
, ajax :: AJAX
, dom :: DOM
| eff
, dom :: DOM
| eff
) State props Action
performAction NoOp _ _ = void do
T.modifyState \state -> state
......@@ -65,7 +65,7 @@ performAction SignUp _ _ = void do
layoutLanding :: forall props eff . Lang -> Spec ( console :: CONSOLE
, ajax :: AJAX
, dom :: DOM
, dom :: DOM
| eff
) State props Action
layoutLanding FR = layoutLanding' Fr.landingData
......@@ -75,16 +75,16 @@ layoutLanding EN = layoutLanding' En.landingData
layoutLanding' :: forall props eff . LandingData -> Spec ( console :: CONSOLE
, ajax :: AJAX
, dom :: DOM
, dom :: DOM
| eff
) State props Action
layoutLanding' hd = simpleSpec performAction render
where
render :: Render State props Action
render dispatch _ state _ =
[ div [ className "container" ] [ jumboTitle hd false ]
, div [ className "container" ] [ imageEnter hd (onClick \_ -> dispatch $ Enter)]
, div [ className "container" ] [ blocksRandomText' hd ]
[ div [ className "container1" ] [ jumboTitle hd false ]
, div [ className "container1" ] [ imageEnter hd (onClick \_ -> dispatch $ Enter)]
, div [ className "container1" ] [ blocksRandomText' hd ]
]
------------------------------------------------------------------------
......@@ -93,7 +93,7 @@ blocksRandomText' (LandingData hd) = blocksRandomText hd.blockTexts
blocksRandomText :: BlockTexts -> ReactElement
blocksRandomText (BlockTexts bt) =
blocksRandomText (BlockTexts bt) =
div [ className "row" ] ( map showBlock bt.blocks )
where
showBlock :: BlockText -> ReactElement
......@@ -114,7 +114,7 @@ docButton (Button b) = a [ className "btn btn-outline-primary btn-sm spacing-cla
, target "blank"
, title b.title
] [ span [ aria {hidden : true}
, className "glyphicon glyphicon-hand-right"
, className "glyphicon glyphicon-hand-right"
] []
, text b.text
]
......@@ -151,7 +151,7 @@ imageEnter (LandingData hd) action = div [className "row"]
, _id "funnyimg"
, title hd.imageTitle
, action
]
]
[]
]
]
src/Navigation.purs
View file @ 59b1f7a1
......@@ -211,7 +211,7 @@ layout0 layout =
, rs b
]
ls = over _render \render d p s c ->
[div [className "col-md-4"] (render d p s c)]
[div [className "col-md-3"] (render d p s c)]
rs = over _render \render d p s c ->
[ div [className "col-md-8"] (render d p s c) ]
cont = over _render \render d p s c ->
......@@ -240,7 +240,7 @@ layoutSidebar = simpleSpec performAction render
[ div [ _id "dafixedtop"
, className "navbar navbar-inverse navbar-fixed-top"
, role "navigation"
] [ div [className "container"]
] [ div [className "container1"]
[ div [ className "navbar-inner" ]
[ divLogo
, div [ className "collapse navbar-collapse"]
......@@ -384,13 +384,13 @@ divSearchBar = simpleSpec performAction render
render dispatch _ state _ = [div [ className "" ] [ searchbar']]
where
searchbar' = ul [ className "nav navbar-nav"
, style { "margin-left" : "79px"}
, style { "margin-left" : "0px"}
] [ div [className "navbar-form"]
[ input [ className "search-query"
, placeholder "Query, URL or FILE (works with Firefox or Chromium browsers)"
, _type "text"
, style { height: "35px"
, width : "450px"
-- , color: "white"
-- , background : "#A1C2D8"
}
......@@ -431,7 +431,7 @@ layoutFooter :: forall props eff. Spec (dom :: DOM |eff) AppState props Action
layoutFooter = simpleSpec performAction render
where
render :: Render AppState props Action
render dispatch _ state _ = [div [ className "container" ] [ hr [] [], footerLegalInfo']]
render dispatch _ state _ = [div [ className "container1" ] [ hr [] [], footerLegalInfo']]
where
footerLegalInfo' = footer [] [ p [] [ text "Gargantext "
, span [className "glyphicon glyphicon-registration-mark" ] []
......
src/SearchForm.purs
View file @ 59b1f7a1
......@@ -51,15 +51,15 @@ unsafeEventValue e = (unsafeCoerce e).target.value
searchSpec :: forall props eff . Spec ( console :: CONSOLE
, ajax :: AJAX
, dom :: DOM
, dom :: DOM
| eff
) State props Action
searchSpec = simpleSpec performAction render
where
render :: Render State props Action
render dispatch _ state _ =
[ div [className "container"] []
, div [className "container"]
[ div [className "container1"] []
, div [className "container1"]
[ div [className "jumbotron" ]
[ div [className "row" ]
[ div [className "col-md-10" ]
......
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