#!perl -T
use Test::More tests => 1;
use AnyEvent::I3;
my $i3 = i3();
my $cv = $i3->connect;
$cv->recv;
ok(1, "connected");
diag( "Testing AnyEvent::I3 $AnyEvent::I3::VERSION, Perl $], $^X" );