@@ -1383,7 +1383,8 @@ tests =
1383 , " <verse>"
1383 , " <verse>"
1384 , " </quote>"
1384 , " </quote>"
1385 , " </verse>"
1385 , " </verse>"
1387− para "<quote>" <> bulletList [ para "Foo" <> para "</quote>" <> para "bar" <> lineBlock [ "</quote>" ] ]
1388+ blockQuote (bulletList [ para "Foo" <> para "</quote>" <> para "bar" <> lineBlock [ "</quote>" ] ])