diff --git a/Distribution/Version.hs b/Distribution/Version.hs index 7d319e4f3fa3e2d0a8c0ea57cb812b12d8cc68d6..11a10bb4c32452e76940b57bf1ce79440c1bdf4e 100644 --- a/Distribution/Version.hs +++ b/Distribution/Version.hs @@ -62,7 +62,7 @@ import Distribution.Text ( Text(..), display ) import qualified Distribution.Compat.ReadP as Parse import Distribution.Compat.ReadP ((+++)) import qualified Text.PrettyPrint as Disp -import Text.PrettyPrint ((<>)) +import Text.PrettyPrint ((<>), (<+>)) -- ----------------------------------------------------------------------------- -- Version ranges @@ -129,9 +129,9 @@ instance Text VersionRange where disp (UnionVersionRanges (EarlierVersion v2) (ThisVersion v1)) | v1 == v2 = Disp.text "<=" <> disp v1 disp (UnionVersionRanges r1 r2) - = disp r1 <> Disp.text "||" <> disp r2 + = disp r1 <+> Disp.text "||" <+> disp r2 disp (IntersectVersionRanges r1 r2) - = disp r1 <> Disp.text "&&" <> disp r2 + = disp r1 <+> Disp.text "&&" <+> disp r2 parse = do f1 <- factor