Switch pattern and replacement in file path fix

RMI-PACTA · Mar 20, 2024 · 41f40b5 · 41f40b5
1 parent 8825b76
commit 41f40b5
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/tests/testthat/test-get_package_info.R b/tests/testthat/test-get_package_info.R
@@ -82,7 +82,7 @@ expect_package_info <- function(
   testthat::expect_match(
     package_info[[package_identical]][["remotepkgref"]],
     # gsub is used to make windows path into something matching .libPaths()
-    gsub(x = remotepkgref_match, pattern = "[\\]", replacement = "\\\\"),
+    gsub(x = remotepkgref_match, pattern = "[\\\\]", replacement = "\\"),
   )
   testthat::expect_identical(
     package_info[[package_identical]][["remoteref"]],
@@ -166,7 +166,7 @@ test_that("get_individual_package_info collects information for GitHub packages
 
 test_that("get_individual_package_info errors for package that doesn't exist", { #nolint: line_length_linter
   expect_error(
-    get_individual_package_info("this_package_does_not_exist"),
+    get_individual_package_info("this_package_does_not_exist")
   )
 })