fix test

R/namespace.R

@@ -82,7 +82,7 @@ update_namespace_imports <- function(base_path) {
 
 # Here we hand roll parsing and tokenisation from roxygen2 primitives so
 # we can filter tags that we know don't require package code.
-namespace_imports <- function(base_path = ".") {
+ namespace_imports <- function(base_path = ".") {
   paths <- package_files(base_path)
   parsed <- lapply(paths, parse, keep.source = TRUE)
   srcrefs <- lapply(parsed, utils::getSrcref)

tests/testthat/test-namespace.R

@@ -391,7 +391,13 @@ test_that("can extract non-imports from namespace preserving source", {
     "export(b)"
   )
   path <- withr::local_tempfile(lines = lines)
-  expect_equal(namespace_exports(path), lines[c(1:3, 5)])
+  expect_equal(
+    namespace_exports(path),
+    c(
+      paste(lines[1:3], collapse = "\n"),
+      lines[5L]
+    )
+  )
 })
 
 test_that("Invalid imports throw a helpful error", {