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

Tidy.

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
Show Stats 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"))