Commit 49a97e97 authored by Edward Z. Yang's avatar Edward Z. Yang
Browse files

Fix reexported-modules display mangling.

sep allows for horizontal separation, which is absolutely
not what we want.  Use hcat instead.  Thanks @stepcut
for reporting.
Signed-off-by: default avatarEdward Z. Yang <>
parent 4c96e80d
......@@ -181,11 +181,11 @@ data ExposedModule
instance Text ExposedModule where
disp (ExposedModule m reexport) =
Disp.sep [ disp m
, case reexport of
Just m' -> Disp.sep [Disp.text "from", disp m']
Nothing -> Disp.empty
Disp.hsep [ disp m
, case reexport of
Just m' -> Disp.hsep [Disp.text "from", disp m']
Nothing -> Disp.empty
parse = do
m <- parseModuleNameQ
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