2 değiştirilmiş dosya ile 2 ekleme ve 2 silme
+ 1
- 1
R/write_theme.R
Dosyayı Görüntüle
| template <- readLines(tf, warn = FALSE) | template <- readLines(tf, warn = FALSE) | ||||
| template <- paste(template, collapse = "\n") | template <- paste(template, collapse = "\n") | ||||
| x <- glue::glue(template, .open = "{{", .close = "}}") | x <- glue::glue(template, .open = "{{", .close = "}}") | ||||
| cat(x, file = outfile) | |||||
| writeLines(x, con = outfile) | |||||
| if (!is.null(extra_css)) write_extra_css(extra_css, outfile) | if (!is.null(extra_css)) write_extra_css(extra_css, outfile) | ||||
| outfile | outfile | ||||
| } | } |
+ 1
- 1
inst/scripts/write_xaringan_theme_body.R
Dosyayı Görüntüle
| template <- readLines(tf, warn = FALSE) | template <- readLines(tf, warn = FALSE) | ||||
| template <- paste(template, collapse = "\n") | template <- paste(template, collapse = "\n") | ||||
| x <- glue::glue(template, .open = "{{", .close = "}}") | x <- glue::glue(template, .open = "{{", .close = "}}") | ||||
| cat(x, file = outfile) | |||||
| writeLines(x, con = outfile) | |||||
| if (!is.null(extra_css)) write_extra_css(extra_css, outfile) | if (!is.null(extra_css)) write_extra_css(extra_css, outfile) | ||||
| outfile | outfile |
Yükleniyor…