by default, do not check consistency between vignette title and index entry when running R CMD check (because this causes trouble in revdep checks)

yihui · yihui · commit 2e8b8468d2ba · 2020-05-29T22:35:04.000-05:00
diff --git a/R/html_vignette.R b/R/html_vignette.R
@@ -77,7 +77,8 @@ html_vignette <- function(fig_width = 3,
 }
 
 vignette_pre_processor <- function(input_file, metadata = yaml_front_matter(input_file)) {
-  if (!getOption(o <- 'rmarkdown.html_vignette.check_title', TRUE)) return()
+  if (!getOption(o <- 'rmarkdown.html_vignette.check_title', !knitr:::is_R_CMD_check()))
+    return()
   title1 <- metadata[['title']]
   title2 <- tools::vignetteInfo(input_file)[['title']]
   if (!identical(title1, title2)) warning(

Original file line number	Diff line number	Diff line change
`@@ -77,7 +77,8 @@ html_vignette <- function(fig_width = 3,`
`77`	`77`	`}`
`78`	`78`
`79`	`79`	`vignette_pre_processor <- function(input_file, metadata = yaml_front_matter(input_file)) {`
`80`		`- if (!getOption(o <- 'rmarkdown.html_vignette.check_title', TRUE)) return()`
	`80`	`+ if (!getOption(o <- 'rmarkdown.html_vignette.check_title', !knitr:::is_R_CMD_check()))`
	`81`	`+ return()`
`81`	`82`	`title1 <- metadata[['title']]`
`82`	`83`	`title2 <- tools::vignetteInfo(input_file)[['title']]`
`83`	`84`	`if (!identical(title1, title2)) warning(`