[perl-Gtk2] Wrap gdk_cairo_reset_clip (new in gtk+ 2.18)

[Torsten Schönfeld <tsch src gnome org>]

commit 8ba2fe94526bf873ef8d01cff43e3118cb009cae
Author: Quentin Sculo <squentin free fr>
Date:   Tue Apr 13 19:29:22 2010 +0200

    Wrap gdk_cairo_reset_clip (new in gtk+ 2.18)

 t/GdkCairo.t   |    7 +++++++
 xs/GdkCairo.xs |    7 +++++++
 2 files changed, 14 insertions(+), 0 deletions(-)
---
diff --git a/t/GdkCairo.t b/t/GdkCairo.t
index 06549ba..4a10656 100644
--- a/t/GdkCairo.t
+++ b/t/GdkCairo.t
@@ -47,6 +47,13 @@ SKIP: {
     $context -> set_source_pixmap($pixmap, 10, 10);
 }
 
+SKIP: {
+    skip "reset_clip is new in gtk+ 2.18", 0
+        unless Gtk2 -> CHECK_VERSION(2, 18, 0);
+
+    $context->reset_clip ($window->window);
+}
+
 __END__
 
 Copyright (C) 2005-2008 by the gtk2-perl team (see the file AUTHORS for the
diff --git a/xs/GdkCairo.xs b/xs/GdkCairo.xs
index 7fb8168..efb9a0d 100644
--- a/xs/GdkCairo.xs
+++ b/xs/GdkCairo.xs
@@ -61,6 +61,12 @@ void gdk_cairo_set_source_pixmap (cairo_t *cr, GdkPixmap *pixmap, double pixmap_
 
 #endif
 
+#if GTK_CHECK_VERSION (2, 18, 0)
+
+void gdk_cairo_reset_clip (cairo_t *cr, GdkDrawable *drawable);
+
+#endif
+
 # ---------------------------------------------------------------------------- #
 
 MODULE = Gtk2::Gdk::Cairo	PACKAGE = Gtk2::Gdk::Screen	PREFIX = gdk_screen_
@@ -72,3 +78,4 @@ const cairo_font_options_t_ornull* gdk_screen_get_font_options (GdkScreen *scree
 void gdk_screen_set_font_options (GdkScreen *screen, const cairo_font_options_t_ornull *options);
 
 #endif
+