urlpath 6.0.0 → 6.0.1

raw patch · 2 files changed

+3/−3 lines, 2 files

Files

src/Data/Url.hs +2/−2
urlpath.cabal +1/−1

src/Data/Url.hs view

@@ -392,7 +392,7 @@ mkUriLoc auth loc = URI (Strict.Just "https")                    True                    auth-                   (V.fromList $ fmap T.pack $ splitOn "/" $ toFilePath $ locPath loc)+                   (V.fromList $ fmap T.pack $ splitOn "/" $ show loc)                    ( V.fromList $ map (\(l,r) ->                        (T.pack l) Strict.:!:                             (maybe Strict.Nothing (Strict.Just . T.pack) r))@@ -404,7 +404,7 @@ mkUriLocEmpty loc = URI Strict.Nothing                    False                    (URIAuth Strict.Nothing Localhost Strict.Nothing)-                   (V.fromList $ fmap T.pack $ splitOn "/" $ toFilePath $ locPath loc)+                   (V.fromList $ fmap T.pack $ splitOn "/" $ show loc)                    ( V.fromList $ map (\(l,r) ->                        (T.pack l) Strict.:!:                             (maybe Strict.Nothing (Strict.Just . T.pack) r))

urlpath.cabal view

@@ -1,5 +1,5 @@ Name:                   urlpath-Version:                6.0.0+Version:                6.0.1 Author:                 Athan Clark <athan.clark@gmail.com> Maintainer:             Athan Clark <athan.clark@gmail.com> License:                MIT