Server logic for API settings configuration. Handles provider selection, API key validation, model selection, and client creation.
Value
A reactive list containing:
client: Configured ellmer client (reactive)
provider: Selected provider (reactive)
model: Selected model (reactive)
is_configured: Whether settings are valid (reactive)
Examples
if (FALSE) { # \dontrun{
server <- function(input, output, session) {
settings <- api_settings_server("settings")
# Use the configured client
observe({
if (settings$is_configured()) {
client <- settings$client()
# Use client with shinychat
}
})
}
} # }