tests: Use hex color codes for background_color
This commit is contained in:
parent
4a83bd26f8
commit
32532792cd
@ -17,8 +17,7 @@ my $original_rect = X11::XCB::Rect->new(x => 0, y => 0, width => 30, height => 3
|
||||
my $window = X11::XCB::Window->new(
|
||||
class => WINDOW_CLASS_INPUT_OUTPUT,
|
||||
rect => $original_rect,
|
||||
#override_redirect => 1,
|
||||
background_color => 12632256
|
||||
background_color => '#C0C0C0',
|
||||
);
|
||||
|
||||
isa_ok($window, 'X11::XCB::Window');
|
||||
|
@ -20,8 +20,7 @@ my $original_rect = X11::XCB::Rect->new(x => 0, y => 0, width => 30, height => 3
|
||||
my $window = X11::XCB::Window->new(
|
||||
class => WINDOW_CLASS_INPUT_OUTPUT,
|
||||
rect => $original_rect,
|
||||
#override_redirect => 1,
|
||||
background_color => 12632256
|
||||
background_color => '#C0C0C0',
|
||||
);
|
||||
|
||||
isa_ok($window, 'X11::XCB::Window');
|
||||
|
@ -18,7 +18,7 @@ my $window = X11::XCB::Window->new(
|
||||
class => WINDOW_CLASS_INPUT_OUTPUT,
|
||||
rect => $original_rect,
|
||||
override_redirect => 1,
|
||||
background_color => 12632256
|
||||
background_color => '#C0C0C0',
|
||||
);
|
||||
|
||||
isa_ok($window, 'X11::XCB::Window');
|
||||
|
@ -20,7 +20,7 @@ X11::XCB::Connection->connect(':0');
|
||||
my $window = X11::XCB::Window->new(
|
||||
class => WINDOW_CLASS_INPUT_OUTPUT,
|
||||
rect => [ 0, 0, 30, 30],
|
||||
background_color => 12632256,
|
||||
background_color => '#C0C0C0',
|
||||
type => 'utility',
|
||||
);
|
||||
|
||||
@ -43,7 +43,7 @@ $window->unmap;
|
||||
$window = X11::XCB::Window->new(
|
||||
class => WINDOW_CLASS_INPUT_OUTPUT,
|
||||
rect => [ 1, 1, 80, 90],
|
||||
background_color => 12632256,
|
||||
background_color => '#C0C0C0',
|
||||
type => 'utility',
|
||||
);
|
||||
|
||||
|
@ -42,7 +42,7 @@ my $focus = X11::XCB::Connection->input_focus;
|
||||
my $window = X11::XCB::Window->new(
|
||||
class => WINDOW_CLASS_INPUT_OUTPUT,
|
||||
rect => [ 1, 1, 30, 30],
|
||||
background_color => 12632256,
|
||||
background_color => '#C0C0C0',
|
||||
type => 'utility',
|
||||
);
|
||||
|
||||
|
@ -32,8 +32,7 @@ my $primary = first { $_->primary } @{$screens};
|
||||
my $window = X11::XCB::Window->new(
|
||||
class => WINDOW_CLASS_INPUT_OUTPUT,
|
||||
rect => [ 0, 0, 30, 30],
|
||||
#override_redirect => 1,
|
||||
background_color => 12632256,
|
||||
background_color => '#FF0000',
|
||||
type => 'dock',
|
||||
);
|
||||
|
||||
|
@ -18,7 +18,7 @@ sub open_standard_window {
|
||||
my $window = X11::XCB::Window->new(
|
||||
class => WINDOW_CLASS_INPUT_OUTPUT,
|
||||
rect => $original_rect,
|
||||
background_color => 12632256,
|
||||
background_color => '#C0C0C0',
|
||||
);
|
||||
|
||||
$window->create;
|
||||
|
Loading…
Reference in New Issue
Block a user