From 8a3d259ae67057c9ab430fd88d3f765b64d9680d Mon Sep 17 00:00:00 2001 From: Vidar Holen Date: Sun, 3 Nov 2013 12:47:44 -0800 Subject: [PATCH] Don't warn about single quotes in args to perl --- ShellCheck/Analytics.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ShellCheck/Analytics.hs b/ShellCheck/Analytics.hs index 56d1b43..2ebeb73 100644 --- a/ShellCheck/Analytics.hs +++ b/ShellCheck/Analytics.hs @@ -651,7 +651,7 @@ checkSingleQuotedVariables t@(T_SingleQuoted id s) parents = _ -> return () where probablyOk t = - any (\x -> isParamTo parents x t) ["awk", "trap"] + any (\x -> isParamTo parents x t) ["awk", "trap", "perl"] re = mkRegex "\\$[{(0-9a-zA-Z_]" checkSingleQuotedVariables _ _ = return ()