Use readVariableName combinator

2018-01-19 16:19:06 -05:00 · 2018-01-19 16:19:06 -05:00 · dbdab5705f
parent 46a3019ed7
commit dbdab5705f
1 changed files with 1 additions and 1 deletions
--- a/ShellCheck/Parser.hs
+++ b/ShellCheck/Parser.hs
@ -392,7 +392,7 @@ withAnnotations anns =
 readConditionContents single =
    readCondContents `attempting` lookAhead (do
                                pos <- getPosition
-                                s <- many1 letter
+                                s <- readVariableName
                                when (s `elem` commonCommands) $
                                    parseProblemAt pos WarningC 1014 "Use 'if cmd; then ..' to check exit code, or 'if [[ $(cmd) == .. ]]' to check output.")