[perl-Pango] Fix a test failure in t/PangoCairo.t

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

commit b965e39a0b527cc7ca1dbddffb1f32609a521d72
Author: Torsten SchÃnfeld <kaffeetisch gmx de>
Date:   Sun Nov 13 16:59:47 2011 +0100

    Fix a test failure in t/PangoCairo.t

 t/PangoCairo.t |    2 ++
 1 files changed, 2 insertions(+), 0 deletions(-)
---
diff --git a/t/PangoCairo.t b/t/PangoCairo.t
index bcc0745..81ea12c 100644
--- a/t/PangoCairo.t
+++ b/t/PangoCairo.t
@@ -126,6 +126,8 @@ SKIP: {
 
   my $desc = Pango::FontDescription -> from_string('Sans 10');
   my $font = $fontmap -> load_font($context, $desc);
+  skip 'could not load font', 2
+    unless defined $font;
   isa_ok($font, 'Pango::Cairo::Font');
   isa_ok($font -> get_scaled_font(), 'Cairo::ScaledFont');
 }