Fix NubList doctest examples

jgotoh · Apr 11, 2024 · 20544fa · 20544fa
1 parent 68461ee
commit 20544fa
Showing 1 changed file with 3 additions and 2 deletions.
diff --git a/cabal-install/src/Distribution/Client/Utils/Parsec.hs b/cabal-install/src/Distribution/Client/Utils/Parsec.hs
@@ -159,10 +159,11 @@ newtype NubList' sep b a = NubList' {_getNubList :: NubList a}
 -- alaNubList VCat :: NubList a -> NubList' VCat (Identity a) a
 --
 -- >>> :t alaNubList' FSep Token
--- alaNubList' FSep Token :: NubList String -> NubList' FSep Token String
+-- alaNubList' FSep Token
+--   :: NubList String -> NubList' FSep Token String
 --
 -- >>> unpack' (alaNubList' FSep Token) <$> eitherParsec "foo bar foo"
--- Right (toNubList ["bar","foo"])
+-- Right ["foo","bar"]
 alaNubList :: sep -> NubList a -> NubList' sep (Identity a) a
 alaNubList _ = NubList'