@@ -445,7 +445,6 @@ inlineCommand :: PandocMonad m => LP m Inlines
445445inlineCommand = try $ do
446446 (name, raw') <- withRaw anyControlSeq
447447 guard $ name /= "begin" && name /= "end"
448− guard $ not $ isBlockCommand name
449448 exts <- getOption readerExtensions
450449 star <- option "" (string "*")
451450 let name' = name ++ star
@@ -461,7 +460,7 @@ inlineCommand = try $ do
461460 else ignore rawcommand
462461 (lookupListDefault mzero [name',name] inlineCommands <*
463462 optional (try (string "{}")))
464− <|> raw
463+ <|> (guard (not (isBlockCommand name)) >> raw)
465464
466465unlessParseRaw :: PandocMonad m => LP m ()
467466unlessParseRaw = getOption readerExtensions >>=
@@ -648,7 +647,10 @@ inlineCommands = M.fromList $
648647 ] ++ map ignoreInlines
649648 -- these commands will be ignored unless --parse-raw is specified,
650649 -- in which case they will appear as raw latex blocks:
651− [ "index" ]
650+ [ "index"
651+ , "hspace"
652+ , "vspace"
653+ ]
652654
653655mkImage :: PandocMonad m => [(String, String)] -> String -> LP m Inlines
654656mkImage options src = do