Avoid double slashes in URLs

gaborcsardi · gaborcsardi · commit ec6727305990 · 2025-10-08T10:49:30.000+02:00
diff --git a/R/macos.R b/R/macos.R
@@ -21,8 +21,8 @@ r_release_macos <- function(arch = c("x86_64", "arm64")) {
   arch <- match.arg(arch)
   ep <- switch(
     arch,
-    x86_64 = "/r-release-macos",
-    arm64 = "/r-release-macos-arm64",
+    x86_64 = "r-release-macos",
+    arm64 = "r-release-macos-arm64",
     stop("Unknown architecture: ", arch)
   )
   df <- api_version_df1(ep)
diff --git a/R/rversions.R b/R/rversions.R
@@ -16,7 +16,7 @@
 #' r_versions()
 
 r_versions <- function(dots = TRUE) {
-  df <- api_version_df("/r-versions", dots)
+  df <- api_version_df("r-versions", dots)
   df
 }
 
@@ -34,7 +34,7 @@ r_versions <- function(dots = TRUE) {
 #' r_release()
 
 r_release <- function(dots = TRUE) {
-  df <- api_version_df1("/resolve/release", dots)
+  df <- api_version_df1("resolve/release", dots)
   df
 }
 
@@ -52,6 +52,6 @@ r_release <- function(dots = TRUE) {
 #' r_oldrel()
 
 r_oldrel <- function(dots = TRUE) {
-  df <- api_version_df1("/r-oldrel", dots)
+  df <- api_version_df1("r-oldrel", dots)
   df
 }

Original file line number	Diff line number	Diff line change
`@@ -16,7 +16,7 @@`
`16`	`16`	`#' r_versions()`
`17`	`17`
`18`	`18`	`r_versions <- function(dots = TRUE) {`
`19`		`- df <- api_version_df("/r-versions", dots)`
	`19`	`+ df <- api_version_df("r-versions", dots)`
`20`	`20`	`df`
`21`	`21`	`}`
`22`	`22`
`@@ -34,7 +34,7 @@ r_versions <- function(dots = TRUE) {`
`34`	`34`	`#' r_release()`
`35`	`35`
`36`	`36`	`r_release <- function(dots = TRUE) {`
`37`		`- df <- api_version_df1("/resolve/release", dots)`
	`37`	`+ df <- api_version_df1("resolve/release", dots)`
`38`	`38`	`df`
`39`	`39`	`}`
`40`	`40`
`@@ -52,6 +52,6 @@ r_release <- function(dots = TRUE) {`
`52`	`52`	`#' r_oldrel()`
`53`	`53`
`54`	`54`	`r_oldrel <- function(dots = TRUE) {`
`55`		`- df <- api_version_df1("/r-oldrel", dots)`
	`55`	`+ df <- api_version_df1("r-oldrel", dots)`
`56`	`56`	`df`
`57`	`57`	`}`