diff options
| author | Dan Gudmundsson <[email protected]> | 2014-01-17 16:57:29 +0100 |
|---|---|---|
| committer | Dan Gudmundsson <[email protected]> | 2014-01-22 16:33:01 +0100 |
| commit | fb767602c08159daa2190129622ebf185606fd35 (patch) | |
| tree | ad89eb12ac2f554a2151f3605c9122882b7eb386 /lib/wx/test/wx_basic_SUITE.erl | |
| parent | 6459bb3e5c82cdd5474bdd77d8aff3a12ce88910 (diff) | |
| download | otp-fb767602c08159daa2190129622ebf185606fd35.tar.gz otp-fb767602c08159daa2190129622ebf185606fd35.tar.bz2 otp-fb767602c08159daa2190129622ebf185606fd35.zip | |
wx: Delay memory cleanup until safe
Previously we could do a cleanup while we where recursed down
and thus delete the objects we where invoking.
Diffstat (limited to 'lib/wx/test/wx_basic_SUITE.erl')
| -rw-r--r-- | lib/wx/test/wx_basic_SUITE.erl | 16 |
1 files changed, 1 insertions, 15 deletions
diff --git a/lib/wx/test/wx_basic_SUITE.erl b/lib/wx/test/wx_basic_SUITE.erl index 9174b80d52..79dbea0575 100644 --- a/lib/wx/test/wx_basic_SUITE.erl +++ b/lib/wx/test/wx_basic_SUITE.erl @@ -241,21 +241,6 @@ wx_misc(Config) -> %% wx:shutdown() %% How do you test this? - case os:type() of - {win32, _} -> %% These hangs when running automatic tests - skip; %% through ssh on windows. Works otherwise - _ -> - wx_misc:shell([{command,"echo TESTING close the popup shell"}]) - end, - - case wx_test_lib:user_available(Config) of - true -> - wx_misc:shell(); - false -> - %% Don't want to spawn a shell if no user - skip %% is available - end, - ?m(false, wx_misc:isBusy()), ?m(ok, wx_misc:beginBusyCursor([])), ?m(true, wx_misc:isBusy()), @@ -356,6 +341,7 @@ wx_object(Config) -> %% Which it did in my buggy handling of the sync_callback wxWindow:refresh(Frame), ?m([{sync_event, #wx{event=#wxPaint{}}, _}], flush()), + timer:sleep(500), ?m([{cast, slept}], flush()), Monitor = erlang:monitor(process, FramePid), |