perl-Cairo r165 - trunk

[tsch svn gnome org]

Author: tsch
Date: Sun Oct 26 09:37:02 2008
New Revision: 165
URL: http://svn.gnome.org/viewvc/perl-Cairo?rev=165&view=rev

Log:
CAIRO_FONT_TYPE_QUARTZ was introduced in cairo 1.6, not 1.4.


Modified:
   trunk/ChangeLog
   trunk/Makefile.PL

Modified: trunk/Makefile.PL
==============================================================================
--- trunk/Makefile.PL	(original)
+++ trunk/Makefile.PL	Sun Oct 26 09:37:02 2008
@@ -286,8 +286,6 @@
 	my %new = (
 		cairo_status_t => [qw/CAIRO_STATUS_INVALID_INDEX
 		                      CAIRO_STATUS_CLIP_NOT_REPRESENTABLE/],
-
-		cairo_font_type_t => [qw/CAIRO_FONT_TYPE_QUARTZ/],
 	);
 
 	foreach my $enum (keys %new) {
@@ -303,6 +301,17 @@
 		CAIRO_PS_LEVEL_2
 		CAIRO_PS_LEVEL_3
 	/];
+
+	my %new = (
+		cairo_font_type_t => [qw/CAIRO_FONT_TYPE_QUARTZ/],
+	);
+
+	foreach my $enum (keys %new) {
+		foreach my $value (@{$new{$enum}}) {
+			push @{$enums{$enum}}, $value;
+		}
+	}
+
 } else {
 	$enums{cairo_ps_level_t} = [];
 }