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

Merge pull request #6 from asr/master 

Fixed documentation and buggy example
This commit is contained in:
Bryan O'Sullivan 2015-01-20 15:20:04 -08:00
parent 97afb2427d 43c4b2782e
commit 177f53bd99
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
System/FilePath/Find.hs
View File

@ -29,7 +29,7 @@
-- Because 'FindClause' is a monad, you can use the usual monad
-- machinery to, for example, lift pure functions into it.
--
-- Here's a clause that will return 'False' for any file whose
-- Here's a clause that will return 'True' for any file whose
-- directory name contains the word @\"temp\"@.
--
-- @

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]