From e490c74e1b5ba7a1c55c6225b6b58eb9a4f063b3 Mon Sep 17 00:00:00 2001
From: RobFryer <Rob.Fryer@gov.scot>
Date: Tue, 3 Sep 2024 18:45:08 +0100
Subject: [PATCH] plot_multiassessment

---
 R/graphics_functions.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/graphics_functions.R b/R/graphics_functions.R
index 80541f2..118d174 100644
--- a/R/graphics_functions.R
+++ b/R/graphics_functions.R
@@ -1516,7 +1516,7 @@ plot_multiassessment <- function(data, assessment, series, info, ...) {
         }
 
         pushViewport(viewport(clip = "off"))
-        grid.text(info$plotNames$assessment[i], 0, unit(1, "npc") + unit(1, "char"), 
+        grid.text(series$plotNames$assessment[i], 0, unit(1, "npc") + unit(1, "char"), 
                   just = c("left", "bottom"), gp = gpar(cex = xykey.cex))
         upViewport()
       })