1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
|
Description: Skip a test in t/04-window.t which fails with "No such atom (WM_PROTOCOLS)"
at least when run under Xvfb. Check if a WM_PROTOCOLS atom works before using it.
.
Seen in a Debian unstable chroot, and apparently also on Gentoo:
https://archives.gentoo.org/gentoo-commits/1751655611.b2b56d08c5dc1c6fc599d5a785447b99eaf37b64.sam@gentoo/
where t/04-window.t is removed.
Origin: vendor
Author: gregor herrmann <gregoa@debian.org>
Last-Update: 2025-08-21
Forwarded: https://github.com/zhmylove/X11-XCB/pull/2
Bug: https://github.com/zhmylove/X11-XCB/pull/2
--- a/t/04-window.t
+++ b/t/04-window.t
@@ -23,6 +23,11 @@
isa_ok($root, 'X11::XCB::Window');
+SKIP: {
+ my $wm_protocols_atom = $x->atom(name => 'WM_PROTOCOLS');
+ skip "Connection doesn't support atom WM_PROTOCOLS, maybe related to Xvfb.", 1
+ unless $wm_protocols_atom->exists;
+
my $rect = $root->rect;
ok('rect of the root window could be retrieved');
@@ -40,6 +45,8 @@
sleep 1;
$window->delete_hint('urgency');
sleep 1;
+} # end SKIP WM_PROTOCOLS
+
}
diag( "Testing X11::XCB, Perl $], $^X" );
|
