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



commit c65b29adcbd6fd27b9ecba0176d97a1a5459b917
Author: Torsten SchÃnfeld <kaffeetisch gmx de>
Date:   Tue Aug 2 20:59:38 2011 +0200

    Fix a test failure in GtkRecentChooser.t

 t/GtkRecentChooser.t |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)
---
diff --git a/t/GtkRecentChooser.t b/t/GtkRecentChooser.t
index d80bf17..c793158 100644
--- a/t/GtkRecentChooser.t
+++ b/t/GtkRecentChooser.t
@@ -50,7 +50,7 @@ $manager -> add_item($uri_one);
 $manager -> add_item($uri_two);
 
 # add_item() is asynchronous, so let the main loop spin for a while
-Gtk2->main_iteration while !$manager->get_items;
+Gtk2->main_iteration while scalar (my @items = $manager->get_items) < 2;
 
 $chooser -> set_select_multiple(FALSE);
 



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