mirror of
https://github.com/agdamsbo/REDCapCAST.git
synced 2024-11-22 13:30:23 +01:00
Adding in recursive call to process_user_input for 'response'
Also removing partial dependency on httr
This commit is contained in:
parent
1053329a62
commit
4389f2bca6
@ -36,18 +36,6 @@ process_user_input.character <- function(x, ...) {
|
||||
|
||||
process_user_input.response <- function(x, ...) {
|
||||
|
||||
if (!requireNamespace("httr", quietly = TRUE)) {
|
||||
stop(
|
||||
"The package 'httr' is needed to convert ",
|
||||
deparse(substitute(x)),
|
||||
" into a data frame.",
|
||||
"\n Either install 'httr' or pass ",
|
||||
deparse(substitute(x)),
|
||||
" as a 'data.frame'.",
|
||||
call. = FALSE
|
||||
)
|
||||
}
|
||||
|
||||
httr::content(x, as = "text")
|
||||
process_user_input(rawToChar(x$content))
|
||||
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user