diff --git a/modules/Saving/R/save_probabilities.R b/modules/Saving/R/save_probabilities.R
index 3253e7b71f74222879bf5a8874604a6815631094..76a5a54c397e63ae3a367402006d4016dbef5301 100644
--- a/modules/Saving/R/save_probabilities.R
+++ b/modules/Saving/R/save_probabilities.R
@@ -123,8 +123,8 @@ save_probabilities <- function(recipe,
       time <- times$time
 
       # Generate name of output file
-      outfile <- get_filename(outdir, recipe, data_cube$attrs$Variable$varName,
-                              fcst.sdate, agg, "probs")
+      outfile <- get_filename(outdir, recipe, variable, fcst.sdate, agg,
+                              "probs")
     
       # Get grid data and metadata and export to netCDF
       if (tolower(agg) == "country") {