[perl-Gtk3] Avoid some warnings from the tests
- From: Torsten SchÃnfeld <tsch src gnome org>
- To: commits-list gnome org
- Cc:
- Subject: [perl-Gtk3] Avoid some warnings from the tests
- Date: Fri, 25 Jan 2013 19:32:43 +0000 (UTC)
commit ab402eed026042cd4436304b7dcdd4875cd5ba3b
Author: Torsten SchÃnfeld <kaffeetisch gmx de>
Date: Fri Jan 25 20:32:38 2013 +0100
Avoid some warnings from the tests
t/signals.t | 1 +
t/zz-GtkContainer.t | 1 +
2 files changed, 2 insertions(+), 0 deletions(-)
---
diff --git a/t/signals.t b/t/signals.t
index 8b40b7e..c11a382 100644
--- a/t/signals.t
+++ b/t/signals.t
@@ -10,6 +10,7 @@ plan tests => 3;
# Gtk3::Widget.size-allocate
{
my $window = Gtk3::Window->new;
+ $window->show;
my $alloc = {x => 10, y => 10, width => 100, height => 100};
my $data = [23, 42];
$window->signal_connect (size_allocate => sub {
diff --git a/t/zz-GtkContainer.t b/t/zz-GtkContainer.t
index 3fd3379..ad3784f 100644
--- a/t/zz-GtkContainer.t
+++ b/t/zz-GtkContainer.t
@@ -20,6 +20,7 @@ is ($window->child_type, 'Gtk3::Widget', 'a window wants a widget');
# i think we'd know if $container->add didn't work
$window->add ($vbox);
ok (1, 'added a widget to the window');
+$window->show_all;
$window->set_focus_child($vbox);
ok (1);
[
Date Prev][
Date Next] [
Thread Prev][
Thread Next]
[
Thread Index]
[
Date Index]
[
Author Index]