[packages/perl-Cairo] correct types usage to fix build with gcc 14

[atler]

commit c868ad7d89b7fa7dffc0bb5898eac1414c247e9a
Author: Jan Palus <atler at pld-linux.org>
Date:   Sun Jul 27 12:29:04 2025 +0200

    correct types usage to fix build with gcc 14

 perl-Cairo.spec |  2 ++
 types.patch     | 16 ++++++++++++++++
 2 files changed, 18 insertions(+)
---
diff --git a/perl-Cairo.spec b/perl-Cairo.spec
index fcd166b..cc1e4e6 100644
--- a/perl-Cairo.spec
+++ b/perl-Cairo.spec
@@ -12,6 +12,7 @@ License:	LGPL v2.1+
 Group:		Development/Languages/Perl
 Source0:	https://downloads.sourceforge.net/gtk2-perl/%{pnam}-%{version}.tar.gz
 # Source0-md5:	8f7cd2260014e4f9fb42dfb28cd55d66
+Patch0:		types.patch
 URL:		http://gtk2-perl.sourceforge.net/
 BuildRequires:	cairo-devel >= 1.16.0
 BuildRequires:	perl-ExtUtils-Depends >= 0.201
@@ -46,6 +47,7 @@ Pliki programistyczne wiązań Cairo dla Perla.
 
 %prep
 %setup -q -n %{pnam}-%{version}
+%patch -P0 -p1
 
 %build
 %{__perl} Makefile.PL \
diff --git a/types.patch b/types.patch
new file mode 100644
index 0000000..4efa156
--- /dev/null
+++ b/types.patch
@@ -0,0 +1,16 @@
+--- Cairo-1.109/CairoSurface.xs.orig	2020-11-24 07:31:53.000000000 +0100
++++ Cairo-1.109/CairoSurface.xs	2025-07-27 12:24:40.838432842 +0200
+@@ -389,11 +389,11 @@
+ cairo_surface_set_mime_data (cairo_surface_t *surface, const char *mime_type, SV *data);
+     PREINIT:
+ 	const unsigned char *mime_data;
+-	unsigned long length;
++	STRLEN length;
+     CODE:
+ 	SvREFCNT_inc (data);
+ 	mime_data = (const unsigned char *) SvPV(data, length);
+-	RETVAL = cairo_surface_set_mime_data (surface, mime_type, mime_data, length, data_destroy, data);
++	RETVAL = cairo_surface_set_mime_data (surface, mime_type, mime_data, (unsigned long) length, data_destroy, data);
+     OUTPUT:
+ 	RETVAL
+ 
================================================================

---- gitweb:

http://git.pld-linux.org/gitweb.cgi/packages/perl-Cairo.git/commitdiff/c868ad7d89b7fa7dffc0bb5898eac1414c247e9a