diff options
author | Siri Hansen <[email protected]> | 2013-05-22 11:46:03 +0200 |
---|---|---|
committer | Dan Gudmundsson <[email protected]> | 2013-05-23 09:44:47 +0200 |
commit | 6a1c4daa036cd5e26bfe1995b004621ba6984d60 (patch) | |
tree | ab02206884e1128396e8c99a481ec0108bb16644 /lib/observer/src/observer_lib.erl | |
parent | f2f29ac19a18b4870bc4b8b5eaa5e04ecabbcdb5 (diff) | |
download | otp-6a1c4daa036cd5e26bfe1995b004621ba6984d60.tar.gz otp-6a1c4daa036cd5e26bfe1995b004621ba6984d60.tar.bz2 otp-6a1c4daa036cd5e26bfe1995b004621ba6984d60.zip |
observer: Add allocator info to gui
Diffstat (limited to 'lib/observer/src/observer_lib.erl')
-rw-r--r-- | lib/observer/src/observer_lib.erl | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/lib/observer/src/observer_lib.erl b/lib/observer/src/observer_lib.erl index 4077f8371a..f7712cf3da 100644 --- a/lib/observer/src/observer_lib.erl +++ b/lib/observer/src/observer_lib.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 2011-2012. All Rights Reserved. +%% Copyright Ericsson AB 2011-2013. All Rights Reserved. %% %% The contents of this file are subject to the Erlang Public License, %% Version 1.1, (the "License"); you may not use this file except in @@ -122,7 +122,10 @@ fill_info([{Str, Key}|Rest], Data) when is_atom(Key); is_function(Key) -> [{Str, get_value(Key, Data)} | fill_info(Rest, Data)]; fill_info([{Str, {Format, Key}}|Rest], Data) when is_atom(Key); is_function(Key), is_atom(Format) -> - [{Str, {Format, get_value(Key,Data)}} | fill_info(Rest, Data)]; + case get_value(Key, Data) of + undefined -> [{Str, undefined} | fill_info(Rest, Data)]; + Value -> [{Str, {Format, Value}} | fill_info(Rest, Data)] + end; fill_info([{Str,SubStructure}|Rest], Data) when is_list(SubStructure) -> [{Str, fill_info(SubStructure, Data)}|fill_info(Rest,Data)]; fill_info([{Str,Attrib,SubStructure}|Rest], Data) -> |