Last updated on 2023-01-25 04:51:45 CET.
| Flavor | Version | Tinstall | Tcheck | Ttotal | Status | Flags |
|---|---|---|---|---|---|---|
| r-devel-linux-x86_64-debian-clang | 1.0.1 | 3.09 | 57.20 | 60.29 | OK | |
| r-devel-linux-x86_64-debian-gcc | 1.0.1 | 2.04 | 44.39 | 46.43 | OK | |
| r-devel-linux-x86_64-fedora-clang | 1.0.1 | 70.95 | OK | |||
| r-devel-linux-x86_64-fedora-gcc | 1.0.1 | 82.80 | OK | |||
| r-patched-linux-x86_64 | 1.0.1 | 3.49 | 55.65 | 59.14 | OK | |
| r-release-linux-x86_64 | 1.0.1 | 3.04 | 56.53 | 59.57 | OK | |
| r-release-macos-arm64 | 1.0.1 | 209.00 | OK | |||
| r-release-macos-x86_64 | 1.0.1 | 219.00 | OK | |||
| r-release-windows-x86_64 | 1.0.1 | 16.00 | 113.00 | 129.00 | OK | |
| r-oldrel-macos-arm64 | 1.0.1 | 209.00 | OK | |||
| r-oldrel-macos-x86_64 | 1.0.1 | 226.00 | OK | |||
| r-oldrel-windows-ix86+x86_64 | 1.0.1 | 8.00 | 64.00 | 72.00 | ERROR |
Version: 1.0.1
Check: examples
Result: ERROR
Running examples in 'queryup-Ex.R' failed
The error most likely occurred in:
> ### Name: get_uniprot_data
> ### Title: Retrieve data from UniProt using UniProt's REST API
> ### Aliases: get_uniprot_data
>
> ### ** Examples
>
> #Getting gene names, keywords and protein sequences for a set of UniProt IDs.
> ids <- c("P22682", "P47941")
> cols <- c("accession", "id", "gene_names", "keyword", "sequence")
> query = list("accession_id" = ids)
> df <- get_uniprot_data(query = query, columns = cols)$content
Error in function (type, msg, asError = TRUE) :
error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol
Calls: get_uniprot_data ... <Anonymous> -> <Anonymous> -> curlPerform -> <Anonymous> -> fun
Execution halted
Flavor: r-oldrel-windows-ix86+x86_64
Version: 1.0.1
Check: tests
Result: ERROR
Running 'testthat.R' [5s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
> library(testthat)
> library(queryup)
>
> test_check("queryup")
Query not supported
Query not supported
Query not supported
Query not supported
Querying the UniProt database...
|
| | 0%Querying the UniProt database...
|
| | 0%Querying the UniProt database...
|
| | 0%[ FAIL 16 | WARN 0 | SKIP 0 | PASS 4 ]
== Failed tests ================================================================
-- Error ('test-get_uniprot_data.R:10'): Query with a single UniProt identifier works --
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol",
TRUE)`: error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol
Backtrace:
x
1. +-testthat::expect_equal(...) at test-get_uniprot_data.R:10:2
2. | \-testthat::quasi_label(enquo(object), label, arg = "object")
3. | \-rlang::eval_bare(expr, quo_get_env(quo))
4. +-methods::is(get_uniprot_data("P22682")$content, "data.frame")
5. +-queryup::get_uniprot_data("P22682")
6. | +-jsonlite::fromJSON(RCurl::getURL(full_url))
7. | \-RCurl::getURL(full_url)
8. | \-RCurl::curlPerform(curl = curl, .opts = opts, .encoding = .encoding)
9. \-RCurl (local) `<fn>`(...)
-- Error ('test-get_uniprot_data.R:16'): Call with no 'columns' defined works --
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol",
TRUE)`: error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol
Backtrace:
x
1. +-queryup::get_uniprot_data(query, columns = NULL) at test-get_uniprot_data.R:16:2
2. | +-jsonlite::fromJSON(RCurl::getURL(full_url))
3. | \-RCurl::getURL(full_url)
4. | \-RCurl::curlPerform(curl = curl, .opts = opts, .encoding = .encoding)
5. \-RCurl (local) `<fn>`(...)
-- Error ('test-get_uniprot_data.R:23'): A message is returned if 'print_url' is TRUE --
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol",
TRUE)`: error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol
Backtrace:
x
1. +-testthat::expect_message(...) at test-get_uniprot_data.R:23:2
2. | \-testthat:::expect_condition_matching(...)
3. | \-testthat:::quasi_capture(...)
4. | +-testthat (local) .capture(...)
5. | | \-base::withCallingHandlers(...)
6. | \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. +-queryup::get_uniprot_data("P22682", print_url = TRUE)
8. | +-jsonlite::fromJSON(RCurl::getURL(full_url))
9. | \-RCurl::getURL(full_url)
10. | \-RCurl::curlPerform(curl = curl, .opts = opts, .encoding = .encoding)
11. \-RCurl (local) `<fn>`(...)
-- Error ('test-get_uniprot_data.R:27'): A message is returned if 'print_uniprot_messages' is TRUE --
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol",
TRUE)`: error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol
Backtrace:
x
1. +-testthat::expect_message(...) at test-get_uniprot_data.R:27:2
2. | \-testthat:::expect_condition_matching(...)
3. | \-testthat:::quasi_capture(...)
4. | +-testthat (local) .capture(...)
5. | | \-base::withCallingHandlers(...)
6. | \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. +-queryup::get_uniprot_data(...)
8. | +-jsonlite::fromJSON(RCurl::getURL(full_url))
9. | \-RCurl::getURL(full_url)
10. | \-RCurl::curlPerform(curl = curl, .opts = opts, .encoding = .encoding)
11. \-RCurl (local) `<fn>`(...)
-- Error ('test-get_uniprot_data.R:36'): Basic query works ---------------------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol",
TRUE)`: error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol
Backtrace:
x
1. +-queryup::get_uniprot_data(query) at test-get_uniprot_data.R:36:2
2. | +-jsonlite::fromJSON(RCurl::getURL(full_url))
3. | \-RCurl::getURL(full_url)
4. | \-RCurl::curlPerform(curl = curl, .opts = opts, .encoding = .encoding)
5. \-RCurl (local) `<fn>`(...)
-- Error ('test-get_uniprot_data.R:47'): Query with unrecognized query fields fails with a warning --
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol",
TRUE)`: error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol
Backtrace:
x
1. +-testthat::expect_warning(get_uniprot_data(query), "request failed") at test-get_uniprot_data.R:47:2
2. | \-testthat:::expect_condition_matching(...)
3. | \-testthat:::quasi_capture(...)
4. | +-testthat (local) .capture(...)
5. | | \-base::withCallingHandlers(...)
6. | \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. +-queryup::get_uniprot_data(query)
8. | +-jsonlite::fromJSON(RCurl::getURL(full_url))
9. | \-RCurl::getURL(full_url)
10. | \-RCurl::curlPerform(curl = curl, .opts = opts, .encoding = .encoding)
11. \-RCurl (local) `<fn>`(...)
-- Error ('test-get_uniprot_data.R:55'): Query with unrecognized field parameter fails with a warning --
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol",
TRUE)`: error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol
Backtrace:
x
1. +-testthat::expect_warning(...) at test-get_uniprot_data.R:55:2
2. | \-testthat:::expect_condition_matching(...)
3. | \-testthat:::quasi_capture(...)
4. | +-testthat (local) .capture(...)
5. | | \-base::withCallingHandlers(...)
6. | \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. +-queryup::get_uniprot_data(query, columns = columns)
8. | +-jsonlite::fromJSON(RCurl::getURL(full_url))
9. | \-RCurl::getURL(full_url)
10. | \-RCurl::curlPerform(curl = curl, .opts = opts, .encoding = .encoding)
11. \-RCurl (local) `<fn>`(...)
-- Error ('test-get_uniprot_data.R:63'): Query with only non valid entries works --
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol",
TRUE)`: error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol
Backtrace:
x
1. +-testthat::expect_message(...) at test-get_uniprot_data.R:63:2
2. | \-testthat:::expect_condition_matching(...)
3. | \-testthat:::quasi_capture(...)
4. | +-testthat (local) .capture(...)
5. | | \-base::withCallingHandlers(...)
6. | \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. +-testthat::expect_message(get_uniprot_data(query), "invalid values were found")
8. | \-testthat:::expect_condition_matching(...)
9. | \-testthat:::quasi_capture(...)
10. | +-testthat (local) .capture(...)
11. | | \-base::withCallingHandlers(...)
12. | \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
13. +-queryup::get_uniprot_data(query)
14. | +-jsonlite::fromJSON(RCurl::getURL(full_url))
15. | \-RCurl::getURL(full_url)
16. | \-RCurl::curlPerform(curl = curl, .opts = opts, .encoding = .encoding)
17. \-RCurl (local) `<fn>`(...)
-- Error ('test-get_uniprot_data.R:74'): Query with non valid entries for multiple query fields works --
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol",
TRUE)`: error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol
Backtrace:
x
1. +-testthat::expect_message(...) at test-get_uniprot_data.R:74:2
2. | \-testthat:::expect_condition_matching(...)
3. | \-testthat:::quasi_capture(...)
4. | +-testthat (local) .capture(...)
5. | | \-base::withCallingHandlers(...)
6. | \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. +-testthat::expect_message(get_uniprot_data(query), "invalid values were found")
8. | \-testthat:::expect_condition_matching(...)
9. | \-testthat:::quasi_capture(...)
10. | +-testthat (local) .capture(...)
11. | | \-base::withCallingHandlers(...)
12. | \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
13. +-queryup::get_uniprot_data(query)
14. | +-jsonlite::fromJSON(RCurl::getURL(full_url))
15. | \-RCurl::getURL(full_url)
16. | \-RCurl::curlPerform(curl = curl, .opts = opts, .encoding = .encoding)
17. \-RCurl (local) `<fn>`(...)
-- Error ('test-get_uniprot_data.R:85'): Query with valid and invalid values work --
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol",
TRUE)`: error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol
Backtrace:
x
1. +-testthat::expect_message(get_uniprot_data(query), "invalid values were found") at test-get_uniprot_data.R:85:2
2. | \-testthat:::expect_condition_matching(...)
3. | \-testthat:::quasi_capture(...)
4. | +-testthat (local) .capture(...)
5. | | \-base::withCallingHandlers(...)
6. | \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. +-queryup::get_uniprot_data(query)
8. | +-jsonlite::fromJSON(RCurl::getURL(full_url))
9. | \-RCurl::getURL(full_url)
10. | \-RCurl::curlPerform(curl = curl, .opts = opts, .encoding = .encoding)
11. \-RCurl (local) `<fn>`(...)
-- Error ('test-get_uniprot_data.R:94'): Long queries work ---------------------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol",
TRUE)`: error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol
Backtrace:
x
1. +-testthat::expect_equal(...) at test-get_uniprot_data.R:94:2
2. | \-testthat::quasi_label(enquo(object), label, arg = "object")
3. | \-rlang::eval_bare(expr, quo_get_env(quo))
4. +-base::setequal(get_uniprot_data(query)$content$Entry, ids)
5. | \-base::as.vector(x)
6. +-queryup::get_uniprot_data(query)
7. | +-jsonlite::fromJSON(RCurl::getURL(full_url))
8. | \-RCurl::getURL(full_url)
9. | \-RCurl::curlPerform(curl = curl, .opts = opts, .encoding = .encoding)
10. \-RCurl (local) `<fn>`(...)
-- Error ('test-query_uniprot.R:5'): Long queries work -------------------------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol",
TRUE)`: error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol
Backtrace:
x
1. +-queryup::query_uniprot(query) at test-query_uniprot.R:5:2
2. | \-queryup::get_uniprot_data(...)
3. | +-jsonlite::fromJSON(RCurl::getURL(full_url))
4. | \-RCurl::getURL(full_url)
5. | \-RCurl::curlPerform(curl = curl, .opts = opts, .encoding = .encoding)
6. \-RCurl (local) `<fn>`(...)
-- Error ('test-query_uniprot.R:13'): Long queries with no columns defined work --
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol",
TRUE)`: error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol
Backtrace:
x
1. +-queryup::query_uniprot(query, columns = NULL) at test-query_uniprot.R:13:2
2. | \-queryup::get_uniprot_data(...)
3. | +-jsonlite::fromJSON(RCurl::getURL(full_url))
4. | \-RCurl::getURL(full_url)
5. | \-RCurl::curlPerform(curl = curl, .opts = opts, .encoding = .encoding)
6. \-RCurl (local) `<fn>`(...)
-- Error ('test-query_uniprot.R:22'): Short queries work -----------------------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol",
TRUE)`: error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol
Backtrace:
x
1. +-queryup::query_uniprot(query) at test-query_uniprot.R:22:2
2. | \-queryup::get_uniprot_data(query = query, columns = columns, print_url = print_url)
3. | +-jsonlite::fromJSON(RCurl::getURL(full_url))
4. | \-RCurl::getURL(full_url)
5. | \-RCurl::curlPerform(curl = curl, .opts = opts, .encoding = .encoding)
6. \-RCurl (local) `<fn>`(...)
-- Error ('test-query_uniprot.R:27'): Setting 'max_keys' above 300 produces a warning --
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol",
TRUE)`: error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol
Backtrace:
x
1. +-testthat::expect_warning(...) at test-query_uniprot.R:27:2
2. | \-testthat:::expect_condition_matching(...)
3. | \-testthat:::quasi_capture(...)
4. | +-testthat (local) .capture(...)
5. | | \-base::withCallingHandlers(...)
6. | \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. +-queryup::query_uniprot("P22682", max_keys = 301)
8. | \-queryup::get_uniprot_data(query = query, columns = columns, print_url = print_url)
9. | +-jsonlite::fromJSON(RCurl::getURL(full_url))
10. | \-RCurl::getURL(full_url)
11. | \-RCurl::curlPerform(curl = curl, .opts = opts, .encoding = .encoding)
12. \-RCurl (local) `<fn>`(...)
-- Error ('test-query_uniprot.R:34'): Query works when multiple fields have more than 'max_keys' items --
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol",
TRUE)`: error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol
Backtrace:
x
1. +-queryup::query_uniprot(...) at test-query_uniprot.R:34:2
2. | \-base::lapply(...)
3. | \-queryup (local) FUN(X[[i]], ...)
4. | \-queryup::get_uniprot_data(...)
5. | +-jsonlite::fromJSON(RCurl::getURL(full_url))
6. | \-RCurl::getURL(full_url)
7. | \-RCurl::curlPerform(curl = curl, .opts = opts, .encoding = .encoding)
8. \-RCurl (local) `<fn>`(...)
[ FAIL 16 | WARN 0 | SKIP 0 | PASS 4 ]
Error: Test failures
Execution halted
Flavor: r-oldrel-windows-ix86+x86_64
Version: 1.0.1
Check: re-building of vignette outputs
Result: WARN
Error(s) in re-building vignettes:
--- re-building 'queryup.Rmd' using rmarkdown
Quitting from lines 31-34 (queryup.Rmd)
Error: processing vignette 'queryup.Rmd' failed with diagnostics:
error:14077102:SSL routines:SSL23_GET_SERVER_HELLO:unsupported protocol
--- failed re-building 'queryup.Rmd'
SUMMARY: processing the following file failed:
'queryup.Rmd'
Error: Vignette re-building failed.
Execution halted
Flavor: r-oldrel-windows-ix86+x86_64