## ----setup, include = FALSE---------------------------------------------------
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  eval = FALSE
)

## -----------------------------------------------------------------------------
# example_dir <- system.file("examples", package = "exams2ilias")
# list.files(example_dir, full.names = TRUE)

## -----------------------------------------------------------------------------
# library(exams2ilias)
# 
# outdir <- tempfile("ilias-")
# dir.create(outdir)
# 
# exams2ilias(
#   file.path(example_dir, "stats_schoice.Rmd"),
#   n = 1,
#   dir = outdir,
#   name = "stats_schoice",
#   xmlcollapse = FALSE,
#   solutionswitch = FALSE
# )

## -----------------------------------------------------------------------------
# source(file.path(example_dir, "generate_examples.R"))
# 
# outdir <- tempfile("ilias-examples-")
# dir.create(outdir)
# 
# generate_example_exports(outdir)