diff --git a/NAMESPACE b/NAMESPACE
index 4696b0e590..304e7ef6ac 100644
--- 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
index 2640b8e1c5..a6637f3e57 100644
--- 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
index 4bbb1d492c..b6e530d198 100644
--- a/man/element.Rd
+++ b/man/element.Rd
@@ -8,7 +8,7 @@
 \alias{element_geom}
 \alias{rel}
 \alias{margin}
-\alias{part_margin}
+\alias{margin_part}
 \title{Theme elements}
 \usage{
 element_blank()
@@ -68,7 +68,7 @@ rel(x)
 
 margin(t = 0, r = 0, b = 0, l = 0, unit = "pt")
 
-part_margin(t = NA, r = NA, b = NA, l = NA, unit = "pt")
+margin_part(t = NA, r = NA, b = NA, l = NA, unit = "pt")
 }
 \arguments{
 \item{fill}{Fill colour.}