@@ -673,6 +673,7 @@ environments = M.fromList
673673 , ("tabular", env "tabular" simpTable)
674674 , ("quote", blockQuote <$> env "quote" blocks)
675675 , ("quotation", blockQuote <$> env "quotation" blocks)
676+ , ("verse", blockQuote <$> env "verse" blocks)
676677 , ("itemize", bulletList <$> listenv "itemize" (many item))
677678 , ("description", definitionList <$> listenv "description" (many descItem))
678679 , ("enumerate", ordered_list)