CoordSf takes linewidth instead of size (#5183)

teunbrand · web-flow · commit 8b659c2adc8a · 2023-02-09T19:51:43.000+01:00
diff --git a/NEWS.md b/NEWS.md
@@ -1,5 +1,7 @@
 # ggplot2 (development version)
 
+* Fixed bug in `coord_sf()` where graticule lines didn't obey 
+  `panel.grid.major`'s linewidth setting (@teunbrand, #5179)
 * The `datetime_scale()` scale constructor is now exported for use in extension
   packages (@teunbrand, #4701).
 * `geom_text()` drops observations where `angle = NA` instead of throwing an
diff --git a/R/coord-sf.R b/R/coord-sf.R
@@ -305,7 +305,7 @@ CoordSf <- ggproto("CoordSf", CoordCartesian,
     } else {
       line_gp <- gpar(
         col = el$colour,
-        lwd = len0_null(el$size*.pt),
+        lwd = len0_null(el$linewidth * .pt),
         lty = el$linetype
       )
       grobs <- c(

Original file line number	Diff line number	Diff line change
`@@ -305,7 +305,7 @@ CoordSf <- ggproto("CoordSf", CoordCartesian,`
`305`	`305`	`} else {`
`306`	`306`	`line_gp <- gpar(`
`307`	`307`	`col = el$colour,`
`308`		`- lwd = len0_null(el$size*.pt),`
	`308`	`+ lwd = len0_null(el$linewidth * .pt),`
`309`	`309`	`lty = el$linetype`
`310`	`310`	`)`
`311`	`311`	`grobs <- c(`