@@ -435,7 +435,7 @@ section (ident, classes, kvs) lvl = do
435435
436436inlineCommand :: PandocMonad m => LP m Inlines
437437inlineCommand = try $ do
438− name <- anyControlSeq
438+ (name, raw') <- withRaw anyControlSeq
439439 guard $ name /= "begin" && name /= "end"
440440 guard $ not $ isBlockCommand name
441441 exts <- getOption readerExtensions
@@ -444,7 +444,7 @@ inlineCommand = try $ do
444444 let raw = do
445445 rawargs <- withRaw
446446 (skipangles *> skipopts *> option "" dimenarg *> many braced)
447− let rawcommand = '\\' : name ++ star ++ snd rawargs
447+ let rawcommand = raw' ++ star ++ snd rawargs
448448 transformed <- applyMacros' rawcommand
449449 if transformed /= rawcommand
450450 then parseFromString inlines transformed