aboutsummaryrefslogtreecommitdiffstats
path: root/lib/observer/src/crashdump_viewer.erl
diff options
context:
space:
mode:
authorSverker Eriksson <[email protected]>2017-03-16 19:01:08 +0100
committerSverker Eriksson <[email protected]>2017-03-22 15:27:17 +0100
commit772f04770bdec7341f63bf4fddb7b893b4ffdd27 (patch)
tree89226abd3794b9bf31e2d2f16700aa1ad202bb4d /lib/observer/src/crashdump_viewer.erl
parent68091d358305c90240976ff0c6bf297ec07307dd (diff)
downloadotp-772f04770bdec7341f63bf4fddb7b893b4ffdd27.tar.gz
otp-772f04770bdec7341f63bf4fddb7b893b4ffdd27.tar.bz2
otp-772f04770bdec7341f63bf4fddb7b893b4ffdd27.zip
observer: Polish crashdump viewer for ETS
Replaced "Id" column with "Is Named". Removed "Slot" column. Sort by name instead if id. Use name in right-click menu instead of id.
Diffstat (limited to 'lib/observer/src/crashdump_viewer.erl')
-rw-r--r--lib/observer/src/crashdump_viewer.erl6
1 files changed, 5 insertions, 1 deletions
diff --git a/lib/observer/src/crashdump_viewer.erl b/lib/observer/src/crashdump_viewer.erl
index 13e73f027d..e21f1c501b 100644
--- a/lib/observer/src/crashdump_viewer.erl
+++ b/lib/observer/src/crashdump_viewer.erl
@@ -1555,10 +1555,14 @@ split_pid_list_no_space([],[],Pids) ->
%% Page with external ets tables
get_ets_tables(File,Pid,WS) ->
ParseFun = fun(Fd,Id) ->
- get_etsinfo(Fd,#ets_table{pid=list_to_pid(Id)},WS)
+ ET = get_etsinfo(Fd,#ets_table{pid=list_to_pid(Id)},WS),
+ ET#ets_table{is_named=tab_is_named(ET)}
end,
lookup_and_parse_index(File,{?ets,Pid},ParseFun,"ets").
+tab_is_named(#ets_table{id=Name,name=Name}) -> "yes";
+tab_is_named(#ets_table{}) -> "no".
+
get_etsinfo(Fd,EtsTable = #ets_table{details=Ds},WS) ->
case line_head(Fd) of
"Slot" ->