[perl-Gtk3] Skip generic signal marshaller tests if needed

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

commit cdb79c09e24c58b60f0593cdf93a233e4f70352e
Author: Torsten SchÃnfeld <kaffeetisch gmx de>
Date:   Fri Jan 11 15:11:20 2013 +0100

    Skip generic signal marshaller tests if needed

 t/overrides.t    |    5 ++++-
 t/zz-GtkDialog.t |   31 ++++++++++++++++++-------------
 2 files changed, 22 insertions(+), 14 deletions(-)
---
diff --git a/t/overrides.t b/t/overrides.t
index 84e2ceb..8ce3562 100644
--- a/t/overrides.t
+++ b/t/overrides.t
@@ -83,7 +83,10 @@ plan tests => 98;
 }
 
 # GtkEditable.insert-text signal
-{
+SKIP: {
+  skip 'Need generic signal marshaller', 5
+    unless check_gi_version (1, 33, 10);
+
   my $entry = Gtk3::Entry->new;
   my $orig_text = 'ÃÃÃ';
   $entry->set_text ($orig_text);
diff --git a/t/zz-GtkDialog.t b/t/zz-GtkDialog.t
index 28067eb..846a5c9 100644
--- a/t/zz-GtkDialog.t
+++ b/t/zz-GtkDialog.t
@@ -51,19 +51,24 @@ $btn3->clicked;
 
 # make sure that known response types are converted to strings for the reponse
 # signal of Gtk3::Dialog and its ancestors
-foreach my $package (qw/Gtk3::Dialog Gtk3::AboutDialog/) {
-  my $d = $package->new;
-  my $b = $d->add_button ('First Button', 'ok');
-  $d->signal_connect (response => sub {
-    is ($_[1], 'ok', "$package response");
-    Gtk3::EVENT_STOP;
-  });
-  Glib::Idle->add( sub {
-    $b->clicked;
-    Glib::SOURCE_REMOVE;
-  });
-  is ($d->run, 'ok', "$package run");
-  $d->hide;
+SKIP: {
+  skip 'Need generic signal marshaller', 4
+    unless check_gi_version (1, 33, 10);
+
+  foreach my $package (qw/Gtk3::Dialog Gtk3::AboutDialog/) {
+    my $d = $package->new;
+    my $b = $d->add_button ('First Button', 'ok');
+    $d->signal_connect (response => sub {
+      is ($_[1], 'ok', "$package response");
+      Gtk3::EVENT_STOP;
+    });
+    Glib::Idle->add( sub {
+      $b->clicked;
+      Glib::SOURCE_REMOVE;
+    });
+    is ($d->run, 'ok', "$package run");
+    $d->hide;
+  }
 }
 
 {