From bafb065d7c985a377c223fc7c2ef1631853d6861 Mon Sep 17 00:00:00 2001 From: Michael Stapelberg Date: Sun, 20 Feb 2011 23:50:01 +0100 Subject: [PATCH] =?utf8?q?tests:=20don=E2=80=99t=20skip=20t/10-dock.t,=20m?= =?utf8?q?ake=20it=20work=20again?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- testcases/t/10-dock.t | 8 ++------ 1 file changed, 2 insertions(+), 6 deletions(-) diff --git a/testcases/t/10-dock.t b/testcases/t/10-dock.t index f53626a5..66a05b26 100644 --- a/testcases/t/10-dock.t +++ b/testcases/t/10-dock.t @@ -10,9 +10,6 @@ BEGIN { use_ok('X11::XCB::Connection') or BAIL_OUT('Cannot load X11::XCB::Connection'); } -SKIP: { - skip "Dock clients not yet implemented", 1; - my $x = X11::XCB::Connection->new; ##################################################################### @@ -30,7 +27,7 @@ my $window = $x->root->create_child( class => WINDOW_CLASS_INPUT_OUTPUT, rect => [ 0, 0, 30, 30], background_color => '#FF0000', - type => $x->atom(name => '_NET_WM_WINDOW_TYPE_DOCK'), + window_type => $x->atom(name => '_NET_WM_WINDOW_TYPE_DOCK'), ); $window->map; @@ -44,7 +41,7 @@ my $fwindow = $x->root->create_child( class => WINDOW_CLASS_INPUT_OUTPUT, rect => [ 0, 0, 30, 30], background_color => '#FF0000', - type => $x->atom(name => '_NET_WM_WINDOW_TYPE_DOCK'), + window_type => $x->atom(name => '_NET_WM_WINDOW_TYPE_DOCK'), ); $fwindow->transient_for($window); @@ -54,4 +51,3 @@ sleep 0.25; diag( "Testing i3, Perl $], $^X" ); -} -- 2.39.5