]> git.sur5r.net Git - i3/i3/commitdiff
tests: complete_run: directly use X11::XCB instead of ::Connection
authorMichael Stapelberg <michael@stapelberg.de>
Sat, 24 Sep 2011 12:09:20 +0000 (13:09 +0100)
committerMichael Stapelberg <michael@stapelberg.de>
Sat, 24 Sep 2011 12:09:20 +0000 (13:09 +0100)
This saves about 0.5s wallclock time due to not starting up Moose/Mouse.
This is worthwhile when you develop a new feature and you are often invoking
complete_run for one specific test.

testcases/complete-run.pl

index 8f740d8caf2965cafb5bc4b535bb8f02ace36b71..74bc507fe06132315ab00c6aa5afbb0671a0288a 100755 (executable)
@@ -28,7 +28,7 @@ use AnyEvent::I3 qw(:all);
 use Try::Tiny;
 use Getopt::Long;
 use Time::HiRes qw(sleep);
-use X11::XCB::Connection;
+use X11::XCB;
 use IO::Socket::UNIX; # core
 use POSIX; # core
 use AnyEvent::Handle;
@@ -75,13 +75,14 @@ my $result = GetOptions(
 my @conns;
 my @wdisplays;
 for my $display (@displays) {
-    try {
-        my $x = X11::XCB::Connection->new(display => $display);
+    my $screen;
+    my $x = X11::XCB->new($display, $screen);
+    if ($x->has_error) {
+        say STDERR "WARNING: Not using X11 display $display, could not connect";
+    } else {
         push @conns, $x;
         push @wdisplays, $display;
-    } catch {
-        say STDERR "WARNING: Not using X11 display $display, could not connect";
-    };
+    }
 }
 
 my $config = slurp('i3-test.config');