2 # vim:ts=4:sw=4:expandtab
5 use X11::XCB 'WINDOW_CLASS_INPUT_OUTPUT';
7 my $original_rect = X11::XCB::Rect->new(x => 0, y => 0, width => 30, height => 30);
9 my $window = $x->root->create_child(
10 class => WINDOW_CLASS_INPUT_OUTPUT,
11 rect => $original_rect,
12 background_color => '#C0C0C0',
15 isa_ok($window, 'X11::XCB::Window');
17 is_deeply($window->rect, $original_rect, "rect unmodified before mapping");
23 my $new_rect = $window->rect;
24 ok(!eq_deeply($new_rect, $original_rect), "Window got repositioned");