1
1
mirror of https://github.com/github/semantic.git synced 2024-12-01 09:15:01 +03:00

Prevent double quoting for export statements

This commit is contained in:
Rick Winfrey 2016-10-07 16:42:47 -05:00
parent 9a3fccc1e1
commit d9660efdbe

View File

@ -128,6 +128,7 @@ toLeafInfos (LeafInfo "number" termName) = pure (squotes (toDoc termName))
toLeafInfos (LeafInfo "boolean" termName) = pure (squotes (toDoc termName))
toLeafInfos (LeafInfo "anonymous function" termName) = pure (toDoc termName)
toLeafInfos (LeafInfo cName@"string" termName) = pure (toDoc termName <+> toDoc cName)
toLeafInfos (LeafInfo cName@"export statement" termName) = pure (toDoc termName <+> toDoc cName)
toLeafInfos LeafInfo{..} = pure (squotes (toDoc termName) <+> toDoc categoryName)
toLeafInfos BranchInfo{..} = toLeafInfos =<< branches
toLeafInfos err@ErrorInfo{} = pure (pretty err)