dismiss global margins when stretchy

teunbrand · teunbrand · commit 75464926dcc2 · 2025-04-15T15:29:53.000+02:00
diff --git a/R/guides-.R b/R/guides-.R
@@ -742,10 +742,10 @@ Guides <- ggproto(
     )
 
     # Set global margin
-    if (stretch_x) {
+    if (stretch_x || stretch_spacing) {
       global_margin[c(2, 4)] <- unit(0, "cm")
     }
-    if (stretch_y) {
+    if (stretch_y || stretch_spacing) {
       global_margin[c(1, 3)] <- unit(0, "cm")
     }
     guides <- gtable_add_padding(guides, global_margin)

Original file line number	Diff line number	Diff line change
`@@ -742,10 +742,10 @@ Guides <- ggproto(`
`742`	`742`	`)`
`743`	`743`
`744`	`744`	`# Set global margin`
`745`		`- if (stretch_x) {`
	`745`	`+ if (stretch_x \|\| stretch_spacing) {`
`746`	`746`	`global_margin[c(2, 4)] <- unit(0, "cm")`
`747`	`747`	`}`
`748`		`- if (stretch_y) {`
	`748`	`+ if (stretch_y \|\| stretch_spacing) {`
`749`	`749`	`global_margin[c(1, 3)] <- unit(0, "cm")`
`750`	`750`	`}`
`751`	`751`	`guides <- gtable_add_padding(guides, global_margin)`