Commit e95ccbbb authored by Abinaya Sudhir's avatar Abinaya Sudhir

Need suggestion

parent d52981e3
...@@ -4,7 +4,7 @@ import Control.Monad.Eff.Console (CONSOLE) ...@@ -4,7 +4,7 @@ import Control.Monad.Eff.Console (CONSOLE)
import DOM (DOM) import DOM (DOM)
import Network.HTTP.Affjax (AJAX) import Network.HTTP.Affjax (AJAX)
import Prelude hiding (div) import Prelude hiding (div)
import React.DOM (a, div, h3, h5, img, small, span, text) import React.DOM (a, div, h3, h5, h6, img, li, small, span, text, ul)
import React.DOM.Props (_id, className, src) import React.DOM.Props (_id, className, src)
import Thermite (PerformAction, Render, Spec, modifyState, simpleSpec) import Thermite (PerformAction, Render, Spec, modifyState, simpleSpec)
...@@ -50,14 +50,22 @@ userPageSpec = simpleSpec performAction render ...@@ -50,14 +50,22 @@ userPageSpec = simpleSpec performAction render
] ]
, div [className "col-md-8"] , div [className "col-md-8"]
[ [
div [className "list-group"] ul [className "list-group"]
[ [
a [className "list-group-item list-group-item-action flex-column align-items-start"] li [className "list-group-item justify-content-between"]
[ div [className "d-flex w-100 justify-content-between"] [ span [] [text "fonction"]
[ h5 [className "mb-1"] [ text "fonction"] , span [className "badge badge-default badge-pill"] [text "Ensignent checheur"]
, small [] [text "Enseignant chercheur"]
]
] ]
, li [className "list-group-item justify-content-between"]
[ span [] [text "Entitte, service"]
, span [className "badge badge-default badge-pill"] [text "Mines Saint - Etinene SPIN -PTSI"]
]
, li [className "list-group-item justify-content-between"]
[ span [] [text "Entitte, service"]
, span [className "badge badge-default badge-pill"] [text "Mines Saint - Etinene"]
]
] ]
] ]
] ]
......
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