Fixed wrong quoting warning for foo=" "; foo

This commit is contained in:
Vidar Holen 2013-11-17 15:00:07 -08:00
parent a793e09bab
commit 4853dce3fe
1 changed files with 1 additions and 1 deletions

View File

@ -1408,7 +1408,7 @@ getModifiedVariables t =
getReferencedVariableCommand base@(T_SimpleCommand _ _ ((T_NormalWord _ ((T_Literal _ x):_)):rest)) = getReferencedVariableCommand base@(T_SimpleCommand _ _ ((T_NormalWord _ ((T_Literal _ x):_)):rest)) =
case x of case x of
"export" -> concatMap getReference rest "export" -> concatMap getReference rest
_ -> [(base,base, x)] _ -> []
where where
getReference t@(T_Assignment _ _ name _ value) = [(t, t, name)] getReference t@(T_Assignment _ _ name _ value) = [(t, t, name)]
getReference t@(T_NormalWord _ [T_Literal _ name]) | not ("-" `isPrefixOf` name) = [(t, t, name)] getReference t@(T_NormalWord _ [T_Literal _ name]) | not ("-" `isPrefixOf` name) = [(t, t, name)]