filepath 1.1.0.1 → 1.1.0.2
raw patch · 2 files changed
+4/−2 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- System/FilePath/Internal.hs +3/−1
- filepath.cabal +1/−1
System/FilePath/Internal.hs view
@@ -488,10 +488,12 @@ -- > dropTrailingPathSeparator "file/test/" == "file/test" -- > not (hasTrailingPathSeparator (dropTrailingPathSeparator x)) || isDrive x -- > Posix: dropTrailingPathSeparator "/" == "/"+-- > Windows: dropTrailingPathSeparator "\\" == "\\" dropTrailingPathSeparator :: FilePath -> FilePath dropTrailingPathSeparator x = if hasTrailingPathSeparator x && not (isDrive x)- then reverse $ dropWhile isPathSeparator $ reverse x+ then let x' = reverse $ dropWhile isPathSeparator $ reverse x+ in if null x' then [pathSeparator] else x' else x
filepath.cabal view
@@ -1,5 +1,5 @@ Name: filepath-Version: 1.1.0.1+Version: 1.1.0.2 License: BSD3 license-file: LICENSE Author: Neil Mitchell