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

Fixed buggy example noRCS

Browse source
This commit is contained in:
Andrés Sicard-Ramírez 2014-06-12 17:47:35 -05:00
parent ca9a53c615
commit 43c4b2782e
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

@ -33,7 +33,7 @@ renameCppToC path = find always (extension ==? ".cpp") path >>=
noRCS :: RecursionPredicate
noRCS = (`elem` ["_darcs","SCCS","CVS",".svn",".hg",".git"]) `liftM` fileName
noRCS = (`notElem` ["_darcs","SCCS","CVS",".svn",".hg",".git"]) `liftM` fileName
cSources :: FilePath -> IO [FilePath]