diff options
author | Dan Gudmundsson <[email protected]> | 2011-11-10 11:12:48 +0100 |
---|---|---|
committer | Dan Gudmundsson <[email protected]> | 2011-11-11 14:59:18 +0100 |
commit | 3caa688c5522b8f0f039b9375cf6377b1bd88f0e (patch) | |
tree | 3a5fb27501f1a3e729683fc29b47df9aa14d9189 /lib/observer/src/observer_pro_wx.erl | |
parent | b7b88933672591d7f7c2a71a4c1643b6ca486f23 (diff) | |
download | otp-3caa688c5522b8f0f039b9375cf6377b1bd88f0e.tar.gz otp-3caa688c5522b8f0f039b9375cf6377b1bd88f0e.tar.bz2 otp-3caa688c5522b8f0f039b9375cf6377b1bd88f0e.zip |
[observer] Fix portability bugs
Turn on generic listctrl implementation on Mac,
the native doesn't work in wx-2.8.
Fix listctrl colours on mac
Turn on wxSystemMenu for miniFrame to get a close box on Windows.
Direct observer help to a browser.
Cleanups
Diffstat (limited to 'lib/observer/src/observer_pro_wx.erl')
-rw-r--r-- | lib/observer/src/observer_pro_wx.erl | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/lib/observer/src/observer_pro_wx.erl b/lib/observer/src/observer_pro_wx.erl index 4bc6da6476..1c0b3ed5ec 100644 --- a/lib/observer/src/observer_pro_wx.erl +++ b/lib/observer/src/observer_pro_wx.erl @@ -182,7 +182,7 @@ create_popup_menu(ParentFrame) -> MiniFrame. create_list_box(Panel, Holder) -> - Style = ?wxLC_REPORT bor ?wxLC_VIRTUAL, + Style = ?wxLC_REPORT bor ?wxLC_VIRTUAL bor ?wxLC_HRULES, ListCtrl = wxListCtrl:new(Panel, [{style, Style}, {onGetItemText, fun(_, Row, Col) -> @@ -296,11 +296,10 @@ handle_info({node, Node}, #state{holder=Holder}=State) -> {noreply, State}; handle_info(Info, State) -> - io:format("~p, ~p, Handled unexpected info: ~p~n", [?MODULE, ?LINE, Info]), + io:format("~p:~p, Unexpected info: ~p~n", [?MODULE, ?LINE, Info]), {noreply, State}. -terminate(Reason, #state{holder=Holder}) -> - io:format("~p terminating. Reason: ~p~n", [?MODULE, Reason]), +terminate(_Reason, #state{holder=Holder}) -> Holder ! stop, etop:stop(), ok. @@ -310,12 +309,12 @@ code_change(_, _, State) -> handle_call(Msg, _From, State) -> - io:format("~p~p: Got Call ~p~n",[?MODULE, ?LINE, Msg]), + io:format("~p:~p: Unhandled call ~p~n",[?MODULE, ?LINE, Msg]), {reply, ok, State}. handle_cast(Msg, State) -> - io:format("~p ~p: Unhandled cast ~p~n", [?MODULE, ?LINE, Msg]), + io:format("~p:~p: Unhandled cast ~p~n", [?MODULE, ?LINE, Msg]), {noreply, State}. %%%%%%%%%%%%%%%%%%%%LOOP%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |