rename part_margin() to margin_part()

teunbrand · teunbrand · commit b4987341844a · 2024-09-20T08:48:47.000+02:00
diff --git a/NAMESPACE b/NAMESPACE
@@ -485,6 +485,7 @@ export(layer_sf)
 export(lims)
 export(map_data)
 export(margin)
+export(margin_part)
 export(max_height)
 export(max_width)
 export(mean_cl_boot)
@@ -497,7 +498,6 @@ export(new_guide)
 export(old_guide)
 export(panel_cols)
 export(panel_rows)
-export(part_margin)
 export(pattern_alpha)
 export(position_dodge)
 export(position_dodge2)
diff --git a/R/margins.R b/R/margins.R
@@ -11,7 +11,7 @@ margin <- function(t = 0, r = 0, b = 0, l = 0, unit = "pt") {
 
 #' @rdname element
 #' @export
-part_margin <- function(t = NA, r = NA, b = NA, l = NA, unit = "pt") {
+margin_part <- function(t = NA, r = NA, b = NA, l = NA, unit = "pt") {
   margin(t = t, r = r, b = b, l = l, unit = unit)
 }
 
diff --git a/man/element.Rd b/man/element.Rd

Original file line number	Diff line number	Diff line change
`@@ -11,7 +11,7 @@ margin <- function(t = 0, r = 0, b = 0, l = 0, unit = "pt") {`
`11`	`11`
`12`	`12`	`#' @rdname element`
`13`	`13`	`#' @export`
`14`		`-part_margin <- function(t = NA, r = NA, b = NA, l = NA, unit = "pt") {`
	`14`	`+margin_part <- function(t = NA, r = NA, b = NA, l = NA, unit = "pt") {`
`15`	`15`	`margin(t = t, r = r, b = b, l = l, unit = unit)`
`16`	`16`	`}`
`17`	`17`