diff options
| author | Dan Gudmundsson <[email protected]> | 2012-11-05 10:47:29 +0100 |
|---|---|---|
| committer | Dan Gudmundsson <[email protected]> | 2013-01-09 11:41:41 +0100 |
| commit | 4d30bb386125882d8baba975f1f7d1ef9a93cc67 (patch) | |
| tree | a860bd82c060778618a563cd7f35cae3244a0360 /lib/wx/test/wx_xtra_SUITE.erl | |
| parent | 9cffd30e76296fec83b22a2b3aa07bd3435cbe30 (diff) | |
| download | otp-4d30bb386125882d8baba975f1f7d1ef9a93cc67.tar.gz otp-4d30bb386125882d8baba975f1f7d1ef9a93cc67.tar.bz2 otp-4d30bb386125882d8baba975f1f7d1ef9a93cc67.zip | |
wx: Modify tests so they work on wxWidgets-2.9
Things have changed in 2.9 modify tests so they are still valid for
both 2.8 and 2.9 branches, so far only tested on linux.
Diffstat (limited to 'lib/wx/test/wx_xtra_SUITE.erl')
| -rw-r--r-- | lib/wx/test/wx_xtra_SUITE.erl | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lib/wx/test/wx_xtra_SUITE.erl b/lib/wx/test/wx_xtra_SUITE.erl index 02a0672594..ad0049a9a5 100644 --- a/lib/wx/test/wx_xtra_SUITE.erl +++ b/lib/wx/test/wx_xtra_SUITE.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 2009-2011. All Rights Reserved. +%% Copyright Ericsson AB 2009-2012. All Rights Reserved. %% %% The contents of this file are subject to the Erlang Public License, %% Version 1.1, (the "License"); you may not use this file except in @@ -111,6 +111,7 @@ app_dies(_Config) -> oops(Die,?LINE), wxFrame:show(Frame), oops(Die,?LINE), + timer:sleep(100), %% Let the window be shown before DC can be created DC0 = wxClientDC:new(Win), oops(Die,?LINE), DC = wxBufferedDC:new(DC0), @@ -134,7 +135,7 @@ app_dies2(Test, N) -> end. oops(Die, Line) when (Die =:= last) orelse (Die =< Line) -> - timer:sleep(500), + timer:sleep(300), ?log(" Exits at line ~p~n",[Line]), exit({oops, Die}); oops(_,_) -> ok. |