Make claude a bit more primary (#844)

* Rename `anthropic_file_` to `claude_`
* Rename `provider-anthropic` to `provider-claude`
* Alias models_claude() to models_anthropic()

Author: hadley

DESCRIPTION

@@ -89,11 +89,11 @@ Collate:
     'parallel-chat.R'
     'params.R'
     'provider-anthropic-files.R'
-    'provider-anthropic.R'
     'provider-any.R'
     'provider-aws.R'
     'provider-openai-compatible.R'
     'provider-azure.R'
+    'provider-claude.R'
     'provider-google.R'
     'provider-cloudflare.R'
     'provider-databricks.R'

NAMESPACE

@@ -29,11 +29,6 @@ export(TypeIgnore)
 export(TypeJsonSchema)
 export(TypeObject)
 export(UserTurn)
-export(anthropic_file_delete)
-export(anthropic_file_download)
-export(anthropic_file_get)
-export(anthropic_file_list)
-export(anthropic_file_upload)
 export(batch_chat)
 export(batch_chat_completed)
 export(batch_chat_structured)
@@ -60,6 +55,11 @@ export(chat_perplexity)
 export(chat_portkey)
 export(chat_snowflake)
 export(chat_vllm)
+export(claude_file_delete)
+export(claude_file_download)
+export(claude_file_get)
+export(claude_file_list)
+export(claude_file_upload)
 export(content_image_file)
 export(content_image_plot)
 export(content_image_url)
@@ -81,6 +81,7 @@ export(live_browser)
 export(live_console)
 export(models_anthropic)
 export(models_aws_bedrock)
+export(models_claude)
 export(models_github)
 export(models_google_gemini)
 export(models_google_vertex)

NEWS.md

@@ -1,7 +1,7 @@
 # ellmer (development version)
 
 * `parallel_chat()` and `batch_chat()` are no longer experimental.
-* New set of `anthropic_file_()` functions for managing file uploads with Anthropic (@dcomputing, #761).
+* New set of `claude_file_()` functions for managing file uploads with Claude (@dcomputing, #761).
 * `chat_openai_compatible()` replaces `chat_openai()` as the interface to use for OpenAI-compatible APIs, and `chat_openai()` is reserved for the official OpenAI API. Unlike previous versions of `chat_openai()`, the `base_url` parameter is now required (#801).
 * `chat_openai()` now uses OpenAI's responses endpoint (#365, #801). This is their recommended endpoint and gives more access to built-in tools.
 * `batch_chat()` now retrieves failed results for `chat_openai()` (#830)
@@ -47,6 +47,7 @@
 * `models_ollama()` was fixed to correctly query model capabilities from remote Ollama servers (#746).
 
 * `chat_claude()` is no longer deprecated and is an alias for `chat_anthropic()`, reflecting Anthropic's recent rebranding of developer tools under the Claude name (#758).
+  `models_claude()` is now an alias for `models_anthropic()`.
 
 # ellmer 0.3.2
 

R/provider-anthropic-files.R

@@ -10,14 +10,14 @@
 #' having a maximum size of 500MB. For more details see
 #' <https://docs.claude.com/en/docs/build-with-claude/files>
 #'
-#' * `anthropic_file_upload()` uploads a file and returns an object that
+#' * `claude_file_upload()` uploads a file and returns an object that
 #'   you can use in chat.
-#' * `anthropic_file_list()` lists all uploaded files.
-#' * `anthropic_file_get()` returns an object for an previously uploaded file.
-#' * `anthropic_file_download()` downloads the file with the given ID. Note
+#' * `claude_file_list()` lists all uploaded files.
+#' * `claude_file_get()` returns an object for an previously uploaded file.
+#' * `claude_file_download()` downloads the file with the given ID. Note
 #'   that you can only download files created by skills or the code execution
 #'   tool.
-#' * `anthropic_file_delete()` deletes the file with the given ID.
+#' * `claude_file_delete()` deletes the file with the given ID.
 #'
 #' @inheritParams chat_anthropic
 #' @param path Path to a file to upload.
@@ -27,12 +27,12 @@
 #' @export
 #' @examples
 #' \dontrun{
-#' file <- anthropic_file_upload("path/to/file.pdf")
+#' file <- claude_file_upload("path/to/file.pdf")
 #' chat <- chat_anthropic(beta_headers = "files-api-2025-04-14")
 #' chat$chat("Please summarize the document.", file)
 #' }
 
-anthropic_file_upload <- function(
+claude_file_upload <- function(
   path,
   base_url = "https://api.anthropic.com/v1/",
   beta_headers = "files-api-2025-04-14",
@@ -54,8 +54,8 @@ anthropic_file_upload <- function(
 }
 
 #' @export
-#' @rdname anthropic_file_upload
-anthropic_file_list <- function(
+#' @rdname claude_file_upload
+claude_file_list <- function(
   base_url = "https://api.anthropic.com/v1/",
   credentials = NULL,
   beta_headers = "files-api-2025-04-14"
@@ -75,8 +75,8 @@ anthropic_file_list <- function(
 }
 
 #' @export
-#' @rdname anthropic_file_upload
-anthropic_file_get <- function(
+#' @rdname claude_file_upload
+claude_file_get <- function(
   file_id,
   base_url = "https://api.anthropic.com/v1/",
   credentials = NULL,
@@ -91,9 +91,9 @@ anthropic_file_get <- function(
 }
 
 #' @export
-#' @rdname anthropic_file_upload
+#' @rdname claude_file_upload
 #' @param path Path to download the file to.
-anthropic_file_download <- function(
+claude_file_download <- function(
   file_id,
   path,
   base_url = "https://api.anthropic.com/v1/",
@@ -110,8 +110,8 @@ anthropic_file_download <- function(
 }
 
 #' @export
-#' @rdname anthropic_file_upload
-anthropic_file_delete <- function(
+#' @rdname claude_file_upload
+claude_file_delete <- function(
   file_id,
   base_url = "https://api.anthropic.com/v1/",
   credentials = NULL,

R/provider-anthropic.R renamed to R/provider-claude.R

@@ -630,7 +630,7 @@ method(batch_result_turn, ProviderAnthropic) <- function(
 
 #' @export
 #' @rdname chat_anthropic
-models_anthropic <- function(
+models_claude <- function(
   base_url = "https://api.anthropic.com/v1",
   api_key = anthropic_key()
 ) {
@@ -661,6 +661,10 @@ models_anthropic <- function(
   df[order(-xtfrm(df$created_at)), ]
 }
 
+#' @export
+#' @rdname chat_anthropic
+models_anthropic <- models_claude
+
 # Helpers ----------------------------------------------------------------
 
 # From httr2

_pkgdown.yml

@@ -27,7 +27,7 @@ reference:
 - subtitle: Provider-specific helpers
   contents:
   - google_upload
-  - starts_with("anthropic_file")
+  - starts_with("claude_file")
 
 - title: Chat helpers
   contents:

man/chat_anthropic.Rd

@@ -1,6 +1,5 @@
 test_that("end-to-end test of all functions", {
   vcr::local_cassette("anthropic-upload-file")
-
   # Avoid using an absolute path in form_file
   local_mocked_bindings(
     form_file = function(path, type) {
@@ -11,8 +10,8 @@ test_that("end-to-end test of all functions", {
     }
   )
 
-  upload <- anthropic_file_upload(test_path("apples.pdf"))
-  defer(anthropic_file_delete(upload@uri))
+  upload <- claude_file_upload(test_path("apples.pdf"))
+  defer(claude_file_delete(upload@uri))
 
   chat <- chat_anthropic_test(beta_headers = "files-api-2025-04-14")
   response <- chat$chat("What's the title of this document?", upload)
@@ -25,8 +24,8 @@ test_that("end-to-end test of all functions", {
 
   # Can't download uploaded files, but at least tests that request succeeds
   path <- withr::local_tempfile()
-  expect_error(anthropic_file_download(upload@uri, path), "not downloadable")
+  expect_error(claude_file_download(upload@uri, path), "not downloadable")
 
-  files <- anthropic_file_list()
+  files <- claude_file_list()
   expect_true("apples.pdf" %in% files$filename)
 })