Skip to content

Commit

Permalink
Fix XKB parsing (#20)
Browse files Browse the repository at this point in the history
  • Loading branch information
39aldo39 committed Feb 25, 2019
1 parent c0e6288 commit 207571a
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/Xkb/Parse.hs
Original file line number Diff line number Diff line change
Expand Up @@ -181,7 +181,7 @@ virtualModifiers ∷ Parser m ⇒ m [String]
virtualModifiers = string' "virtual_modifiers" *> ws *> xkbName `sepBy` comma <* char ';' <* ws

xkbName Parser m m String
xkbName = some (alphaNumChar <|> oneOf ['_','+','-','<','>','(',')','"']) <* ws
xkbName = some (alphaNumChar <|> oneOf ['_','+','-','<','>','(',')']) <* ws

ws Parser m m ()
ws = void $ many singleSpace
Expand Down

0 comments on commit 207571a

Please sign in to comment.