rhi/filemanip
1
0
Fork 0
Code Issues Pull requests Releases Activity

Tidy.

Browse source
This commit is contained in:
Bryan O'Sullivan 2007-04-30 23:07:44 +00:00
parent 3873c897cb
commit 312d0a8b1d
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
examples/Simple.hs
View file

@ -21,7 +21,7 @@ getDanglingLinks = find always (fileType ==? SymbolicLink &&?
renameCppToC :: FilePath -> IO ()
renameCppToC path = find always (extension ==? ".cpp") path >>=
mapM_ (renameWith (replaceExtension ".C"))
mapM_ (renameWith (replaceExtension ".C"))