Skip to content

Commit

Permalink
messageBox.t: condition should be whether on X11
Browse files Browse the repository at this point in the history
  • Loading branch information
chrstphrchvz committed May 15, 2022
1 parent 545b421 commit 2065cae
Showing 1 changed file with 3 additions and 3 deletions.
6 changes: 3 additions & 3 deletions t/messageBox.t
Original file line number Diff line number Diff line change
Expand Up @@ -15,12 +15,12 @@ my $top = MainWindow->new(-title => 'MessageBox Test');


# We use a convoluted way of exiting here without interaction, because
# of different behavior on win32 vs linux
# of different behavior on win32 vs X11
$top->after(1000,
sub{
if( $^O ne 'MSWin32' ){
if( $top->windowingsystem eq 'x11' ){
ok(1);
exit(); # No using $top->destroy here, because we get grab error messages on linux
exit(); # No using $top->destroy here, because we get grab error messages on X11
# But if we use this on windows, we get crashes.

}
Expand Down

0 comments on commit 2065cae

Please sign in to comment.