diff --git a/slides/cufp-metaprogramming-tutorial-slides.hs b/slides/cufp-metaprogramming-tutorial-slides.hs
index 0cb818e..d126194 100644
--- a/slides/cufp-metaprogramming-tutorial-slides.hs
+++ b/slides/cufp-metaprogramming-tutorial-slides.hs
@@ -27,7 +27,7 @@ import Language.LaTeX.Slicer (slice)
 import Language.LaTeX.Builder.QQ
 
 doc = B.document dc preamb body where
-  dc = BM.documentclass [BM.t,BM.red,BM.compress]
+  dc = BM.beamer Nothing [BM.t,BM.red,BM.compress] []
 
 preamb = ø
        ⊕ B.title «Metaprogramming Tutorial:{B.newline}