Don't suggest removing $ in (( ${COLUMNS-80} ))

This commit is contained in:
Vidar Holen 2016-07-30 10:42:33 -07:00
parent 36263fb3f5
commit 6a71ff6f46
1 changed files with 1 additions and 1 deletions

View File

@ -1369,7 +1369,7 @@ checkArithmeticDeref params t@(TA_Expansion _ [b@(T_DollarBraced id _)]) =
unless (isException $ bracedString b) getWarning
where
isException [] = True
isException s = any (`elem` "/.:#%?*@$") s || isDigit (head s)
isException s = any (`elem` "/.:#%?*@$-") s || isDigit (head s)
getWarning = fromMaybe noWarning . msum . map warningFor $ parents params t
warningFor t =
case t of