aboutsummaryrefslogtreecommitdiffstats
path: root/lib/observer/src/cdv_port_wx.erl
diff options
context:
space:
mode:
authorSiri Hansen <[email protected]>2013-10-16 16:53:53 +0200
committerDan Gudmundsson <[email protected]>2014-01-27 16:13:47 +0100
commit41380c0ff6c4fb56aad5702b9d9554ae36580063 (patch)
tree5c16ed3916a700b5f0176d8a33d2ffa28e65c911 /lib/observer/src/cdv_port_wx.erl
parent549205db3dee21e83a64a01f03b1e8ed2225b276 (diff)
downloadotp-41380c0ff6c4fb56aad5702b9d9554ae36580063.tar.gz
otp-41380c0ff6c4fb56aad5702b9d9554ae36580063.tar.bz2
otp-41380c0ff6c4fb56aad5702b9d9554ae36580063.zip
observer: improve wx version of crashdump_viewer
* bugfixes * better progress dialogs * show expanded binaries in different formats * speed up reading of big crashdumps
Diffstat (limited to 'lib/observer/src/cdv_port_wx.erl')
-rw-r--r--lib/observer/src/cdv_port_wx.erl14
1 files changed, 7 insertions, 7 deletions
diff --git a/lib/observer/src/cdv_port_wx.erl b/lib/observer/src/cdv_port_wx.erl
index ca591aeaaa..e34198ea0b 100644
--- a/lib/observer/src/cdv_port_wx.erl
+++ b/lib/observer/src/cdv_port_wx.erl
@@ -46,10 +46,10 @@ col_to_elem(?COL_CTRL) -> #port.controls;
col_to_elem(?COL_SLOT) -> #port.slot.
col_spec() ->
- [{"Id", ?wxLIST_FORMAT_LEFT, 120},
+ [{"Id", ?wxLIST_FORMAT_LEFT, 100},
{"Connected", ?wxLIST_FORMAT_LEFT, 120},
- {"Name", ?wxLIST_FORMAT_LEFT, 200},
- {"Controls", ?wxLIST_FORMAT_LEFT, 250},
+ {"Name", ?wxLIST_FORMAT_LEFT, 150},
+ {"Controls", ?wxLIST_FORMAT_LEFT, 200},
{"Slot", ?wxLIST_FORMAT_RIGHT, 50}].
get_info(_) ->
@@ -77,11 +77,11 @@ get_details(Id) ->
end.
detail_pages() ->
- [{simple, "General Information", fun init_gen_page/3}].
+ [{"General Information", fun init_gen_page/2}].
-init_gen_page(Parent, _Id, Info) ->
+init_gen_page(Parent, Info) ->
Fields = info_fields(),
- cdv_detail_win:init_detail_page(Parent, Fields, Info).
+ cdv_info_page:start_link(Parent,{Fields,Info,[]}).
format({I1,I2}) ->
"#Port<"++integer_to_list(I1) ++ "." ++ integer_to_list(I2) ++ ">";
@@ -94,7 +94,7 @@ format(D) ->
info_fields() ->
[{"Overview",
[{"Name", name},
- {"Connected", connected},
+ {"Connected", {click,connected}},
{"Slot", slot},
{"Controls", controls}]},
{scroll_boxes,