@@ -231,8 +231,13 @@ blockCommands = M.fromList $
231231 , ("subsubsection", section 3)
232232 , ("paragraph", section 4)
233233 , ("subparagraph", section 5)
234+ -- beamer slides
235+ , ("frametitle", section 3)
236+ , ("framesubtitle", section 4)
237+ -- letters
234238 , ("opening", (para . trimInlines) <$> tok)
235239 , ("closing", closing)
240+ --
236241 , ("rule", optional opt *> tok *> tok *> pure horizontalRule)
237242 , ("begin", mzero) -- these are here so they won't be interpreted as inline
238243 , ("end", mzero)