[perl-Gtk2] Fix two test failures



commit ff44a3fab53fa2bc12164ee32a13c2a1880407f0
Author: Torsten SchÃnfeld <kaffeetisch gmx de>
Date:   Mon Aug 6 21:13:25 2012 +0200

    Fix two test failures

 NEWS              |    5 +++++
 t/GtkAdjustment.t |    2 +-
 t/PangoCairo.t    |    2 ++
 3 files changed, 8 insertions(+), 1 deletions(-)
---
diff --git a/NEWS b/NEWS
index 1c2c334..3652a93 100644
--- a/NEWS
+++ b/NEWS
@@ -1,3 +1,8 @@
+Overview of changes in Gtk2 1.245
+=================================
+
+* Fix two test failures.
+
 Overview of changes in Gtk2 1.244
 =================================
 
diff --git a/t/GtkAdjustment.t b/t/GtkAdjustment.t
index dd168db..d9a4914 100644
--- a/t/GtkAdjustment.t
+++ b/t/GtkAdjustment.t
@@ -34,7 +34,7 @@ $adjustment -> changed();
 $adjustment -> value_changed();
 
 SKIP: {
-  skip "stuff that's new in 2.14", 5
+  skip "stuff that's new in 2.14", 11
     unless Gtk2->CHECK_VERSION (2, 14, 0);
 
   # note "value" forced to "lower <= value <= upper-page_size" by
diff --git a/t/PangoCairo.t b/t/PangoCairo.t
index 4a8badc..f4856db 100644
--- a/t/PangoCairo.t
+++ b/t/PangoCairo.t
@@ -128,6 +128,8 @@ SKIP: {
 
   my $desc = Gtk2::Pango::FontDescription -> from_string('Sans 10');
   my $font = $fontmap -> load_font($context, $desc);
+  skip 'could not find font', 2
+    unless defined $font;
   isa_ok($font, 'Gtk2::Pango::Cairo::Font');
   isa_ok($font -> get_scaled_font(), 'Cairo::ScaledFont');
 }



[Date Prev][Date Next]   [Thread Prev][Thread Next]   [Thread Index] [Date Index] [Author Index]