diff --git a/R/spe_plot_calibration_points.R b/R/spe_plot_calibration_points.R
index a74b7b2..8fb15b0 100644
--- a/R/spe_plot_calibration_points.R
+++ b/R/spe_plot_calibration_points.R
@@ -121,7 +121,7 @@ spe_plot_calibration_points <- function(file,
     return(invisible(NULL))
   }
 
-  markpeak(spc, wl_convert_units(
+  mark_peak(spc, wl_convert_units(
     from   = hdr$xCalInputUnit,
     to     = .wl_fix_unit_name(wl_units),
     x      = hdr$xCalValues,