Allow export "foo"="bar" in 2140

This commit is contained in:
Vidar Holen 2014-11-01 12:20:10 -07:00
parent bff5d11566
commit 30c0c1f27d
1 changed files with 1 additions and 1 deletions

View File

@ -1740,7 +1740,7 @@ checkInexplicablyUnquoted _ (T_NormalWord id tokens) = mapM_ check (tails tokens
case trapped of case trapped of
T_DollarExpansion id _ -> warnAboutExpansion id T_DollarExpansion id _ -> warnAboutExpansion id
T_DollarBraced id _ -> warnAboutExpansion id T_DollarBraced id _ -> warnAboutExpansion id
T_Literal id s -> unless (s == "/") $ warnAboutLiteral id T_Literal id s -> unless (s == "/" || s == "=") $ warnAboutLiteral id
_ -> return () _ -> return ()
check _ = return () check _ = return ()