allow titles ending in "et al."

git-svn-id: https://svn.r-project.org/R/trunk@67945 00db46b3-68df-0310-9c12-caf00c1e9a41
wch · Mar 6, 2015 · 5f673a2 · 5f673a2
1 parent 967bb4b
commit 5f673a2
Showing 1 changed file with 1 addition and 1 deletion.
diff --git 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"])