[gimp-perl] use less-obsolete PDL->get_convertedpdl API

[Ed J <edj src gnome org>]

commit a9901031d633dcc9bcb1d87fb2f4a888b27703a3
Author: Ed J <mohawk2 users noreply github com>
Date:   Thu Sep 9 15:33:33 2021 +0100

    use less-obsolete PDL->get_convertedpdl API

 Changes         | 1 +
 lib/Gimp/Lib.xs | 2 +-
 2 files changed, 2 insertions(+), 1 deletion(-)
---
diff --git a/Changes b/Changes
index b987b8b9..37a830fa 100644
--- a/Changes
+++ b/Changes
@@ -1,4 +1,5 @@
 - ignore GEGL-WARNING too
+- use less-obsolete PDL->get_convertedpdl API
 
 2.34 2021-04-17
 - updated constants to GIMP 2.10 versions
diff --git a/lib/Gimp/Lib.xs b/lib/Gimp/Lib.xs
index 57728b52..5b835d2d 100644
--- a/lib/Gimp/Lib.xs
+++ b/lib/Gimp/Lib.xs
@@ -83,8 +83,8 @@ static pdl *new_pdl (int a, int b, int c)
 
 static void old_pdl (pdl **p, short ndims, int dim0)
 {
+  *p = PDL->get_convertedpdl(*p, PDL_B);
   PDL->make_physical (*p);
-  PDL->converttype (p, PDL_B, PDL_PERM);
 
   if ((*p)->ndims < ndims + (dim0 > 1))
     croak (__("dimension mismatch, pdl has dimension %d but at least %d dimensions required"), (*p)->ndims, 
ndims + (dim0 > 1));