Commit 7a050019 authored by Alexandre Delanoë's avatar Alexandre Delanoë

[Cosmetics] minor fix.

parent f8fec2b5
......@@ -147,7 +147,7 @@ instance showNodeType :: Show NodeType where
show Individu = "individu"
show Project = "project"
show Tree = "tree"
show Error = "ErrorShowNodeType"
show Error = "ErrorNodeType"
readNodeType :: String -> NodeType
readNodeType "NodeUser" = NodeUser
......
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