slightly tighten check for PR#17959

git-svn-id: https://svn.r-project.org/R/trunk@88647 00db46b3-68df-0310-9c12-caf00c1e9a41

Author: maechler

tests/reg-tests-1d.R

@@ -5438,7 +5438,7 @@ stopifnot(exprs = {
 stopifnot(!grepl(dQuote(""), m1), !grepl(dQuote(""), m2))
 if(englishMsgs)
     stopifnot(grepl("'arg' should be ", m1),
-              grepl("'arg' should be one ", m2))
+              grepl("'arg' should be one ", c(m1, m2)) |> identical( c(FALSE,TRUE) ))
 ## was  'arg' should be one of “”, “a” ( , “b” )