@@ -168,11 +168,11 @@ configLexer = P.makeTokenParser configLanguage
168mapDecl = do
168mapDecl = do
169 void $ string "map"
169 void $ string "map"
170 P.whiteSpace configLexer
170 P.whiteSpace configLexer
171− termIdent <- (char "_" >> return Nothing) <|>
171+ termIdent <- (char "_" >> return Nothing) <|> (Just <$> P.stringLiteral configLexer)
172 bytes <- P.stringLiteral configLexer
172 bytes <- P.stringLiteral configLexer
173 key <- parseKey
173 key <- parseKey
174 modifiers <- parseModifiers
174 modifiers <- parseModifiers
175− lift $ tell $ def { inputOverrides = [(bytes, EvKey key modifiers)] }
175+ lift $ tell $ def { inputOverrides = [(termIdent, bytes, EvKey key modifiers)] }
177-- TODO: Generated by a vim macro. There is a better way here. Derive parser? Use Read
177-- TODO: Generated by a vim macro. There is a better way here. Derive parser? Use Read
178-- instance?
178-- instance?