Skip to content
Snippets Groups Projects
Unverified Commit e3ea7d7b authored by Jens Petersen's avatar Jens Petersen Committed by GitHub
Browse files

Internal: drop duplicate splitExtensions example

[skip ci]
parent 6711dafd
No related branches found
No related tags found
No related merge requests found
......@@ -426,7 +426,6 @@ stripExtension ext path = case uncons ext of
-- > splitExtensions "file.tar.gz" == ("file",".tar.gz")
-- > uncurry (<>) (splitExtensions x) == x
-- > Valid x => uncurry addExtension (splitExtensions x) == x
-- > splitExtensions "file.tar.gz" == ("file",".tar.gz")
splitExtensions :: FILEPATH -> (FILEPATH, STRING)
splitExtensions x = (a <> c, d)
where
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment