Fixed quoted ~ warning to only trigger for ~/

This commit is contained in:
Vidar Holen
2015-03-07 23:48:01 -08:00
parent dcc10bbdf6
commit 0a2cf208c8
2 changed files with 2 additions and 2 deletions

View File

@@ -950,7 +950,7 @@ readNormalEscaped = called "escaped char" $ do
pos <- getPosition
backslash
do
next <- quotable <|> oneOf "?*@!+[]{}.,"
next <- quotable <|> oneOf "?*@!+[]{}.,~"
return $ if next == '\n' then "" else [next]
<|>
do