@@ -718,17 +718,13 @@ nbsp = try $ do
718718
719719code :: PandocMonad m => MuseParser m (F Inlines)
720720code = try $ do
721− pos <- getPosition
722− sp <- if sourceColumn pos == 1
723− then pure mempty
724− else skipMany1 spaceChar >> pure B.space
725− char '='
721+ atStart $ char '='
726722 contents <- many1Till (noneOf "\n\r" <|> (newline <* notFollowedBy newline)) $ char '='
727723 guard $ not $ null contents
728724 guard $ head contents `notElem` " \t\n"
729725 guard $ last contents `notElem` " \t\n"
730726 notFollowedBy $ satisfy isLetter
731− return $ return (sp B.<> B.code contents)
727+ return $ return $ B.code contents
732728
733729codeTag :: PandocMonad m => MuseParser m (F Inlines)
734730codeTag = do