From c47ec0c8d617ef05f76364f1dabbae6a2efaee63 Mon Sep 17 00:00:00 2001
From: Ed J <mohawk2@users.noreply.github.com>
Date: Mon, 7 Oct 2024 01:22:43 +0000
Subject: [PATCH] switch from deprecated perl_get_sv

---
 PGPLOT.xs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/PGPLOT.xs b/PGPLOT.xs
index 036796f..eb9135e 100644
--- a/PGPLOT.xs
+++ b/PGPLOT.xs
@@ -1497,4 +1497,4 @@ BOOT:
        by other modules
    */
 
-   sv_setiv(perl_get_sv("PGPLOT::HANDLE",TRUE|GV_ADDMULTI), (IV) (void*) &myPGPLOT_handle);
+   sv_setiv(get_sv("PGPLOT::HANDLE",TRUE|GV_ADDMULTI), (IV) (void*) &myPGPLOT_handle);