From 5f673a23edea05a619b5023d3e0413966a999546 Mon Sep 17 00:00:00 2001 From: ripley Date: Fri, 6 Mar 2015 09:30:14 +0000 Subject: [PATCH] allow titles ending in "et al." git-svn-id: https://svn.r-project.org/R/trunk@67945 00db46b3-68df-0310-9c12-caf00c1e9a41 --- src/library/tools/R/QC.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/library/tools/R/QC.R b/src/library/tools/R/QC.R index bf10a2a6887..a9d677d1dfd 100644 --- a/src/library/tools/R/QC.R +++ b/src/library/tools/R/QC.R @@ -3263,7 +3263,7 @@ function(dfile, strict = FALSE) ## Minimal check (so far) of Title and Description. if(strict && !is.na(val <- db["Title"]) - && grepl("[.]$", val) && !grepl(" [.][.][.]", trimws(val))) + && grepl("[.]$", val) && !grepl(" [.][.][.]|et al[.]", trimws(val))) out$bad_Title <- TRUE ## some people put punctuation inside quotes, some outside. if(strict && !is.na(val <- db["Description"])