Bläddra i källkod
Guarantee that missing values are assigned in the function environment only
tags/v0.3.0
2 ändrade filer med 2 tillägg och 2 borttagningar
+ 1
- 1
R/style_xaringan.R
Visa fil
| if (is.null(val)) next | if (is.null(val)) next | ||||
| val <- val[!is.na(val)] | val <- val[!is.na(val)] | ||||
| is_na <- length(val) == 0 | is_na <- length(val) == 0 | ||||
| if (is_na) assign(var, NULL) | |||||
| if (is_na) assign(var, NULL, envir = sys.frame(sys.nframe())) | |||||
| } | } | ||||
| # prepare variables for template | # prepare variables for template |
+ 1
- 1
inst/scripts/style_xaringan_body.R
Visa fil
| if (is.null(val)) next | if (is.null(val)) next | ||||
| val <- val[!is.na(val)] | val <- val[!is.na(val)] | ||||
| is_na <- length(val) == 0 | is_na <- length(val) == 0 | ||||
| if (is_na) assign(var, NULL) | |||||
| if (is_na) assign(var, NULL, envir = sys.frame(sys.nframe())) | |||||
| } | } | ||||
| # prepare variables for template | # prepare variables for template |
Laddar…