From daacc98a8f2ea92cbef565d52a2e89a88caeb769 Mon Sep 17 00:00:00 2001
From: Ekaterina Efimova <katerina.efimova@gmail.com>
Date: Tue, 3 Jan 2017 21:40:32 +0300
Subject: [PATCH] Update Analytics.hs

---
 ShellCheck/Analytics.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ShellCheck/Analytics.hs b/ShellCheck/Analytics.hs
index 495785f..f1be786 100644
--- a/ShellCheck/Analytics.hs
+++ b/ShellCheck/Analytics.hs
@@ -358,7 +358,7 @@ checkPipePitfalls _ (T_Pipeline id _ commands) = do
             let flagsGrep = fromMaybe [] $ map snd <$> getAllFlags <$> getCommand grep
                 flagsWc = fromMaybe [] $ map snd <$> getAllFlags <$> getCommand wc
             in
-                unless ((any (`elem` ["o", "only-matching", "r", "R", "recursive"]) flagsGrep) || (any (`elem` ["m", "chars", "w", "words", "c", "bytes", "L", "max-line-length"]) flagsWc) || ((length flagsWc) == 0)) $
+                unless ((any (`elem` ["o", "only-matching"]) flagsGrep) || (any (`elem` ["m", "chars", "w", "words", "c", "bytes", "L", "max-line-length"]) flagsWc) || ((length flagsWc) == 0)) $
                     style (getId grep) 2126 "Consider using grep -c instead of grep|wc -l."
 
     didLs <- liftM or . sequence $ [
-- 
GitLab