Derive placeholder pages from speclayout order — derive_placeholder_page

Walks an ordered speclayout and, for every placeholder entry, computes the page it must be inserted at so its position among the TLG slides matches its position in the file: `content slides so far + placeholder slides already inserted + 1`.

Usage

derive_placeholder_page_list(
  speclayout,
  content_counts = NULL,
  types = placeholder_types()
)

Arguments

speclayout: A named, ordered `list` read from a speclayout yaml file.
content_counts: Optional named list of the number of slides each TLG entry produced. When given, entries missing from it count as 0 slides (not generated); when `NULL`, every TLG entry counts as one slide.
types: The placeholder types, see [placeholder_types()].

Value

A `list` of placeholder entries in insertion order, each with its `name` and resolved `to_page`.

Examples

speclayout <- list(
  sec_a = list(type = "section", title = "Section A"),
  out1 = list(program = "t_dm_slide", suffix = "FAS"),
  out2 = list(program = "t_ae_slide", suffix = "SE"),
  sec_b = list(type = "section", title = "Section B")
)
vapply(derive_placeholder_page_list(speclayout), function(p) p$to_page, integer(1))
#> [1] 1 4