Skip to content

Commit e3ea7d7

Browse files
authored
Internal: drop duplicate splitExtensions example
[skip ci]
1 parent 6711daf commit e3ea7d7

File tree

1 file changed

+0
-1
lines changed

1 file changed

+0
-1
lines changed

System/FilePath/Internal.hs

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -426,7 +426,6 @@ stripExtension ext path = case uncons ext of
426426
-- > splitExtensions "file.tar.gz" == ("file",".tar.gz")
427427
-- > uncurry (<>) (splitExtensions x) == x
428428
-- > Valid x => uncurry addExtension (splitExtensions x) == x
429-
-- > splitExtensions "file.tar.gz" == ("file",".tar.gz")
430429
splitExtensions :: FILEPATH -> (FILEPATH, STRING)
431430
splitExtensions x = (a <> c, d)
432431
where

0 commit comments

Comments
 (0)