devxy/r-builds
Watch
2
0
Fork
You've already forked r-builds
 0
Code Issues 1 Pull requests Releases Activity

Add quick test for the custom HTTP user agent

Browse source
This commit is contained in:
Greg Lin 2023-01-09 18:27:47 -06:00
commit 16d7f91ad0
1 changed files with 5 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

5
test/test.R
View file

@ -101,3 +101,8 @@ if (getRversion() >= "3.5.0" && getRversion() < "4.0.0") {
} else if (getRversion() >= "4.0.0") { } else if (getRversion() >= "4.0.0") {
stopifnot(has_pcre2 && !has_pcre1) stopifnot(has_pcre2 && !has_pcre1)
} }
# Check that the custom HTTP user agent was configured
if (!grepl(sprintf("^R/%s", getRversion()), getOption("HTTPUserAgent"))) {
stop("unexpected HTTPUserAgent")
}