Perl-cairo patch to add missing status values.
>From 7cfdd0e06c3594fcf12bb8b146cd19cf2030262e Mon Sep 17 00:00:00 2001
From: Raymond S Brand <r...@acm.org>
Date: Wed, 4 Nov 2020 19:51:06 -0500
Subject: [PATCH 1/2] Add missing status codes
---
Makefile.PL | 27 +++++++++++++++++++++++++++
1 file changed, 27 insertions(+)
diff --git a/Makefile.PL b/Makefile.PL
index d7a6d49..2b5b5ca 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -325,6 +325,8 @@ my $have_cairo_1_4 = ExtUtils::PkgConfig->atleast_version("cairo", "1.4.0");
my $have_cairo_1_6 = ExtUtils::PkgConfig->atleast_version("cairo", "1.6.0");
my $have_cairo_1_8 = ExtUtils::PkgConfig->atleast_version("cairo", "1.8.0");
my $have_cairo_1_10 = ExtUtils::PkgConfig->atleast_version("cairo", "1.10.0");
+my $have_cairo_1_12 = ExtUtils::PkgConfig->atleast_version("cairo", "1.12.0");
+my $have_cairo_1_14 = ExtUtils::PkgConfig->atleast_version("cairo", "1.14.0");
my $have_cairo_1_16 = ExtUtils::PkgConfig->atleast_version("cairo", "1.16.0");
if ($have_cairo_1_2) {
@@ -448,6 +450,10 @@ if ($have_cairo_1_8) {
if ($have_cairo_1_10) {
add_new_enum_values(
+ cairo_status_t => [qw/CAIRO_STATUS_INVALID_SIZE
+ CAIRO_STATUS_USER_FONT_NOT_IMPLEMENTED
+ CAIRO_STATUS_DEVICE_TYPE_MISMATCH
+ CAIRO_STATUS_DEVICE_ERROR/],
cairo_surface_type_t => [
qw/CAIRO_SURFACE_TYPE_SCRIPT
CAIRO_SURFACE_TYPE_QT
@@ -501,7 +507,28 @@ if ($have_cairo_1_10) {
$enums{cairo_region_overlap_t} = [];
}
+if ($have_cairo_1_12) {
+ add_new_enum_values(
+ cairo_status_t => [qw/CAIRO_STATUS_INVALID_MESH_CONSTRUCTION
+ CAIRO_STATUS_DEVICE_FINISHED/],
+ );
+} else {
+}
+
+if ($have_cairo_1_14) {
+ add_new_enum_values(
+ cairo_status_t => [qw/CAIRO_STATUS_JBIG2_GLOBAL_MISSING/],
+ );
+} else {
+}
+
if ($have_cairo_1_16) {
+ add_new_enum_values(
+ cairo_status_t => [qw/CAIRO_STATUS_PNG_ERROR
+ CAIRO_STATUS_FREETYPE_ERROR
+ CAIRO_STATUS_WIN32_GDI_ERROR
+ CAIRO_STATUS_TAG_ERROR/],
+ );
$enums{cairo_pdf_metadata_t} = [qw/
CAIRO_PDF_METADATA_
CAIRO_PDF_METADATA_TITLE
--
2.20.1
_______________________________________________
gtk-perl-list mailing list
gtk-perl-list@gnome.org
https://mail.gnome.org/mailman/listinfo/gtk-perl-list
