Fix operators in import list

pull/83/head
Lennart Spitzner 2017-12-18 18:56:50 +01:00
parent c3b6e17261
commit 8c3a9bec25
3 changed files with 3 additions and 1 deletions

View File

@ -666,6 +666,7 @@ import Test ( T
, T3(..)
, T4(T4)
, T5(T5, t5)
, (+)
)
#test hiding

View File

@ -714,6 +714,7 @@ import Test ( T
, T3(..)
, T4(T4)
, T5(T5, t5)
, (+)
)
#test hiding

View File

@ -59,7 +59,7 @@ layoutIE lie@(L _ ie) = docWrapNode lie $ case ie of
, docLit . Text.pack . moduleNameString $ unLoc n
]
_ -> docEmpty
where ien = docLit $ rdrNameToText $ ieName ie
where ien = docLit =<< lrdrNameToTextAnn (ieName <$> lie)
layoutIEList :: [LIE RdrName] -> ToBriDocM BriDocNumbered
layoutIEList lies = do