@@ -561,5 +561,7 @@ parseSkipMacro :: PandocMonad m => ManParser m Blocks
561parseSkipMacro = do
561parseSkipMacro = do
562 pos <- getPosition
562 pos <- getPosition
563 tok <- mmacroAny
563 tok <- mmacroAny
564− report $ SkippedContent (show tok) pos
565+ MMacro mkind _ -> report $ SkippedContent ('.':mkind) pos
566+ _ -> return () -- shouldn't happen
565 return mempty
567 return mempty