fixing uninitialized warnings in testcases

next
Johannes Lange 2017-12-26 13:39:19 +01:00
parent 80ea18624a
commit dc6a099bed
1 changed files with 1 additions and 1 deletions

View File

@ -24,7 +24,7 @@ use i3test;
sub send_net_active_window {
my ($id, $source) = @_;
$source = ($source eq 'pager' ? 2 : 0);
$source = (((defined $source) && ($source eq 'pager')) ? 2 : 0);
my $msg = pack "CCSLLLLLLL",
X11::XCB::CLIENT_MESSAGE, # response_type