Fix a failing test on geom_sf() (#4915)

yutannihilation · web-flow · commit 1dc2b3589d0f · 2022-07-27T06:27:08.000+09:00
diff --git a/tests/testthat/test-geom-sf.R b/tests/testthat/test-geom-sf.R
@@ -237,7 +237,7 @@ test_that("geom_sf draws arrows correctly", {
             as.numeric(sf::st_coordinates(nc)[x + 1, 1:2])
             )
         )
-      ), sf::st_crs(nc)
+      )
     ), "LINESTRING"
   )
 

Original file line number	Diff line number	Diff line change
`@@ -237,7 +237,7 @@ test_that("geom_sf draws arrows correctly", {`
`237`	`237`	`as.numeric(sf::st_coordinates(nc)[x + 1, 1:2])`
`238`	`238`	`)`
`239`	`239`	`)`
`240`		`- ), sf::st_crs(nc)`
	`240`	`+ )`
`241`	`241`	`), "LINESTRING"`
`242`	`242`	`)`
`243`	`243`