[perl-Glib] Fix test failures on older glibs



commit 2f0fc2d54b49b7ca3367a06548ecdcce865bfc08
Author: Torsten SchÃnfeld <kaffeetisch gmx de>
Date:   Tue Aug 2 20:55:35 2011 +0200

    Fix test failures on older glibs

 t/9.t |    2 +-
 t/a.t |    2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)
---
diff --git a/t/9.t b/t/9.t
index e723f4f..d345952 100644
--- a/t/9.t
+++ b/t/9.t
@@ -165,7 +165,7 @@ if ($^O eq 'MSWin32') {
 }
 
 if (Glib->CHECK_VERSION (2, 4, 0)) {
-	print Glib::main_depth == 0 ?
+	print Glib::main_depth() == 0 ?
 	  "ok 17\n" : "not ok 17\n";
 } else {
 	print "ok 17 # skip main_depth\n";
diff --git a/t/a.t b/t/a.t
index bd46ce9..40fd433 100644
--- a/t/a.t
+++ b/t/a.t
@@ -71,7 +71,7 @@ Glib::Log::default_handler ('Test-Domain', ['info'],
                             'another message to ignore', 'userdata');
 
 SKIP: {
-  skip "new 2.6 stuff", 10
+  skip "new 2.6 stuff", 18
     unless Glib->CHECK_VERSION (2,6,0);
   Glib->log ('An-Unknown-Domain', ['info'], 'this is a test message');
 



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