[perl-Gtk2] Fix a test failure in GdkSelection.t

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

commit 00182e2b93bc835ed0fce7a0127c8b91e888338a
Author: Torsten SchÃnfeld <kaffeetisch gmx de>
Date:   Tue Aug 2 20:30:23 2011 +0200

    Fix a test failure in GdkSelection.t

 t/GdkSelection.t |    6 +++++-
 1 files changed, 5 insertions(+), 1 deletions(-)
---
diff --git a/t/GdkSelection.t b/t/GdkSelection.t
index 846df40..fb3a458 100644
--- a/t/GdkSelection.t
+++ b/t/GdkSelection.t
@@ -31,7 +31,11 @@ my $window = Gtk2::Window -> new();
 $window -> realize();
 
 is(Gtk2::Gdk::Selection -> owner_set($window -> window(), $primary, 0, 0), 1);
-is(Gtk2::Gdk::Selection -> owner_get($primary), $window -> window());
+my $owner = Gtk2::Gdk::Selection -> owner_get($primary);
+SKIP: {
+  skip 'owner_get returned undef', 1 unless defined $owner;
+  is($owner, $window -> window())
+};
 
 Gtk2::Gdk::Selection -> convert($window -> window(), $primary, $target, 0);