From aa17e2bb5e9d53c69dcd86b8bf31584db24fe35a Mon Sep 17 00:00:00 2001
From: Dan Gudmundsson <dgud@erlang.org>
Date: Mon, 1 Feb 2010 12:31:25 +0100
Subject: Added tests for wxListCtrl:getItem/2.

---
 lib/wx/test/wx_class_SUITE.erl | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'lib/wx')

diff --git a/lib/wx/test/wx_class_SUITE.erl b/lib/wx/test/wx_class_SUITE.erl
index ddb491be6c..76df6e4a23 100644
--- a/lib/wx/test/wx_class_SUITE.erl
+++ b/lib/wx/test/wx_class_SUITE.erl
@@ -361,6 +361,14 @@ listCtrlSort(Config) ->
     Time = timer:tc(erlang, apply, [Sort,[]]),
     io:format("Sorted ~p ~n",[Time]),
     
+    Item = wxListItem:new(),
+    _List = wx:map(fun(Int) ->
+			   wxListItem:setId(Item, Int),
+			   ?m(true, wxListCtrl:getItem(LC, Item)),
+			   io:format("~s~n",[wxListItem:getText(Item)])
+		   end, lists:seq(0,100)),
+    wxListItem:destroy(Item),
+
     wx_test_lib:wx_destroy(Frame,Config).
 
 
-- 
cgit v1.2.3