haskell#24, turn back on the splitDirectories test

bgamari · Oct 26, 2014 · 72543cc · 72543cc
1 parent e183b40
commit 72543cc
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/System/FilePath/Internal.hs b/System/FilePath/Internal.hs
@@ -636,8 +636,8 @@ splitPath x = [drive | drive /= ""] ++ f path
 -- >          splitDirectories "test/file" == ["test","file"]
 -- >          splitDirectories "/test/file" == ["/","test","file"]
 -- > Windows: splitDirectories "C:\\test\\file" == ["C:\\", "test", "file"]
--- > Posix:   Valid x => joinPath (splitDirectories x) `equalFilePath` x
--- > splitDirectories "" == []
+-- >          Valid x => joinPath (splitDirectories x) `equalFilePath` x
+-- >          splitDirectories "" == []
 splitDirectories :: FilePath -> [FilePath]
 splitDirectories = map dropTrailingPathSeparator . splitPath