~ubuntu-branches/debian/sid/erlang/sid

« back to all changes in this revision

Viewing changes to lib/wx/test/wx_basic_SUITE.erl

  • Committer: Package Import Robot
  • Author(s): Sergei Golovan
  • Date: 2014-01-27 21:46:45 UTC
  • mfrom: (1.3.8)
  • Revision ID: package-import@ubuntu.com-20140127214645-09fbj21hujxxs0sr
Tags: 1:16.b.3.1-dfsg-1
* New upstream bugfix release.
* Removed lib/common_test/priv/*.js from the source because they are
  minified Javascript files without source. Also, added libjs-jquery and
  libjs-jquery-tablesorter to the erlang-common-test dependencies
  (closes: #735896).
* Bumped standards version to 3.9.5.

Show diffs side-by-side

added added

removed removed

Lines of Context:
324
324
wx_object(TestInfo) when is_atom(TestInfo) -> wx_test_lib:tc_info(TestInfo);
325
325
wx_object(Config) ->
326
326
    wx:new(),
327
 
    Frame = ?mt(wxFrame, wx_obj_test:start([])),
 
327
    Me = self(),
 
328
    Init = fun() ->
 
329
                   Frame = wxFrame:new(wx:null(), ?wxID_ANY, "Test wx_object", [{size, {500, 400}}]),
 
330
                   Sz = wxBoxSizer:new(?wxHORIZONTAL),
 
331
                   Panel = wxPanel:new(Frame),
 
332
                   wxSizer:add(Sz, Panel, [{flag, ?wxEXPAND}, {proportion, 1}]),
 
333
                   wxPanel:connect(Panel, size, [{skip, true}]),
 
334
                   wxPanel:connect(Panel, paint, [callback, {userData, Me}]),
 
335
                   wxWindow:show(Frame),
 
336
                   {Frame, {Frame, Panel}}
 
337
           end,
 
338
    Frame = ?mt(wxFrame, wx_obj_test:start([{init, Init}])),
328
339
    timer:sleep(500),
329
340
    ?m(ok, check_events(flush())),
330
341