cgrep 6.5.12 → 6.5.13

raw patch · 4 files changed

+4/−5 lines, 4 files

Files

README.md +1/−1
cgrep.cabal +1/−1
src/Config.hs +1/−1
src/Main.hs +1/−2

README.md view

@@ -4,7 +4,7 @@ Usage ----- -Cgrep 6.5.12 Usage: cgrep [OPTION] [PATTERN] files...+Cgrep 6.5.13 Usage: cgrep [OPTION] [PATTERN] files...  cgrep [OPTIONS] [ITEM]

cgrep.cabal view

@@ -1,6 +1,6 @@ Name:                cgrep Description:         Cgrep: a context-aware grep for source codes-Version:             6.5.12+Version:             6.5.13 Synopsis:            Command line tool Homepage:            http://awgn.github.io/cgrep/ License:             GPL-2

src/Config.hs view

@@ -33,7 +33,7 @@ cgreprc = "cgreprc"  version :: String-version = "6.5.12"+version = "6.5.13"   data Config = Config

src/Main.hs view

@@ -64,7 +64,7 @@   fileFilter :: Options -> [Lang] -> FilePath -> Bool-fileFilter opts langs filename = maybe False (`elem` langs) (getFileLang opts filename)+fileFilter opts langs filename = maybe False (liftA2 (||) (const $ null langs) (`elem` langs)) (getFileLang opts filename)   getFilesMagic :: [FilePath] -> IO [String]@@ -90,7 +90,6 @@                let files' = if null magics                               then  filter (fileFilter opts langs) files                               else  catMaybes $ zipWith (\f m ->  if any (`isInfixOf` m) (magic_filter opts) then Just f else Nothing ) files magics-                 unless (null files') $                     let chunks = chunksOf (Options.chunk opts) files' in