Skip to content

P
purescript-gargantext
Commit 72c016a0 authored by Alexandre Delanoë's avatar Alexandre Delanoë
Browse files
Options

[FIX] user page url.

parent 84644723
Hide whitespace changes
Inline Side-by-side
Showing with 1 addition and 1 deletion
src/Gargantext/Pages/Annuaire.purs
View file @ 72c016a0
...@@ -128,7 +128,7 @@ showRow :: Maybe User -> ReactElement ...@@ -128,7 +128,7 @@ showRow :: Maybe User -> ReactElement
showRow Nothing = tr [][] showRow Nothing = tr [][]
showRow (Just (User { id : id, hyperdata : (HyperData user) })) = showRow (Just (User { id : id, hyperdata : (HyperData user) })) =
tr [] tr []
[ td [] [ a [ href (toUrl Back NodeUser id) ] [ text $ maybe' user.nom <> " " <> maybe' user.prenom ] ] [ td [] [ a [ href (toUrl Front NodeUser id) ] [ text $ maybe' user.nom <> " " <> maybe' user.prenom ] ]
, td [] [text $ maybe' user.fonction] , td [] [text $ maybe' user.fonction]
, td [] [text $ maybe' user.service] , td [] [text $ maybe' user.service]
, td [] [text $ maybe' user.groupe] , td [] [text $ maybe' user.groupe]
......
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