haskell/filepath — pull request #19 by thomie (2014-10-26 20:37:13+00:00)
Title: Refactor splitDirectories

Use `dropTrailingPathSeparator` instead of the custom function `g` to remove
trailing path separators from FilePath components generated with `splitPath`.

Since `dropTrailingPathSeparator` does not change FilePath components
for which isDrive is True, it is no longer necessary to handle the first
FilePath component in a special way.