@@ -1835,7 +1835,7 @@ rawEnv name = do
1835 report $ SkippedContent beginCommand pos1
1835 report $ SkippedContent beginCommand pos1
1836 pos2 <- getPosition
1836 pos2 <- getPosition
1837 report $ SkippedContent ("\\end{" <> name <> "}") pos2
1837 report $ SkippedContent ("\\end{" <> name <> "}") pos2
1838− return bs
1838+ return $ divWith ("",[name],[]) bs
1840rawVerbEnv :: PandocMonad m => Text -> LP m Blocks
1840rawVerbEnv :: PandocMonad m => Text -> LP m Blocks
1841rawVerbEnv name = do
1841rawVerbEnv name = do