Fix issue with documents that don't contain --- options

numbats · Dec 13, 2023 · a3f1434 · a3f1434
1 parent 09c6b3c
commit a3f1434
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/quiz-xml.R b/R/quiz-xml.R
@@ -71,7 +71,7 @@ fence_question <- function(x) {
     generalfeedback = ""
   )
 
-  if(length(opts) > 0) x <- x[-opts_loc]
+  if(length(opts_loc) > 0) x <- x[-opts_loc]
   c(
     paste0(":::{.question", paste0(" ", names(opts), "='", opts, collapse = "'"), "'}"),
     x,