Commit ab986e98 authored by Alexandre Delanoë's avatar Alexandre Delanoë

[Annuaire] fix not documented into blank.

parent 9a926f2d
......@@ -137,7 +137,7 @@ showRow (Just (User { id : id, hyperdata : (HyperData user) })) =
, td [] [text $ maybe' user.groupe]
]
where
maybe' = maybe "Unknown" identity
maybe' = maybe "" identity
------------------------------------------------------------------------------
......
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