diff --git a/R/revealjs_presentation.R b/R/revealjs_presentation.R
index 6af3dc2..e970326 100644
--- a/R/revealjs_presentation.R
+++ b/R/revealjs_presentation.R
@@ -108,8 +108,7 @@
   args <- c(args, pandoc_variable_arg("center", jsbool(center)))
   
   # slide level
-  if (!is.null(slide_level))
-    args <- c(args, "--slide-level", as.character(slide_level))
+  args <- c(args, "--slide-level", as.character(slide_level))
   
   # theme
   theme <- match.arg(theme, revealjs_themes())
diff --git a/inst/NEWS b/inst/NEWS
index 080da12..9c5ff24 100644
--- a/inst/NEWS
+++ b/inst/NEWS
@@ -3,6 +3,8 @@
 
 - Push slide changes to browser history
 
+- Respect slide_level option
+
 
 Version 0.6
 -----------------------------------------------------------------------