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

[FIX] show NodeContact

parent ca9fd47a
...@@ -157,7 +157,7 @@ data NodeType = NodeUser ...@@ -157,7 +157,7 @@ data NodeType = NodeUser
instance showNodeType :: Show NodeType where instance showNodeType :: Show NodeType where
show NodeUser = "NodeUser" show NodeUser = "NodeUser"
show Annuaire = "Annuaire" show Annuaire = "Annuaire"
show NodeContact = "NodeDocument" -- TODO anoe show NodeContact = "NodeContact"
show Corpus = "NodeCorpus" show Corpus = "NodeCorpus"
show CorpusV3 = "NodeCorpusV3" show CorpusV3 = "NodeCorpusV3"
show Dashboard = "NodeDashboard" show Dashboard = "NodeDashboard"
......
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