diff options
author | Raimo Niskanen <[email protected]> | 2018-10-25 14:56:36 +0200 |
---|---|---|
committer | Raimo Niskanen <[email protected]> | 2018-11-16 14:40:44 +0100 |
commit | 6c17eb4036eaa9afba86929821b6ec81a91c2787 (patch) | |
tree | a977aa62fd1ce6f1091c64db630392ac7795df01 /lib/stdlib/src/gen_server.erl | |
parent | 5d530cdfa1f6d7a75f8933b8ce95df8fdbb82b9e (diff) | |
download | otp-6c17eb4036eaa9afba86929821b6ec81a91c2787.tar.gz otp-6c17eb4036eaa9afba86929821b6ec81a91c2787.tar.bz2 otp-6c17eb4036eaa9afba86929821b6ec81a91c2787.zip |
Limit more error_logger terms
Diffstat (limited to 'lib/stdlib/src/gen_server.erl')
-rw-r--r-- | lib/stdlib/src/gen_server.erl | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lib/stdlib/src/gen_server.erl b/lib/stdlib/src/gen_server.erl index 7de62eaf01..3f7c392c12 100644 --- a/lib/stdlib/src/gen_server.erl +++ b/lib/stdlib/src/gen_server.erl @@ -936,11 +936,11 @@ format_log(#{label:={gen_server,terminate}, end end; _ -> - error_logger:limit_term(Reason) + Reason end, {ClientFmt,ClientArgs} = format_client_log(Client), - [LimitedState|LimitedLog] = - [error_logger:limit_term(D) || D <- [State|Log]], + [LimitedMsg,LimitedState,LimitedReason|LimitedLog] = + [error_logger:limit_term(D) || D <- [Msg,State,Reason1|Log]], {"** Generic server ~tp terminating \n" "** Last message in was ~tp~n" "** When Server state == ~tp~n" @@ -949,7 +949,7 @@ format_log(#{label:={gen_server,terminate}, [] -> []; _ -> "** Log ==~n** ~tp~n" end ++ ClientFmt, - [Name, Msg, LimitedState, Reason1] ++ + [Name, LimitedMsg, LimitedState, LimitedReason] ++ case LimitedLog of [] -> []; _ -> [LimitedLog] @@ -959,7 +959,7 @@ format_log(#{label:={gen_server,no_handle_info}, message:=Msg}) -> {"** Undefined handle_info in ~p~n" "** Unhandled message: ~tp~n", - [Mod, Msg]}. + [Mod, error_logger:limit_term(Msg)]}. format_client_log(undefined) -> {"", []}; @@ -970,7 +970,7 @@ format_client_log({From,remote}) -> format_client_log({_From,{Name,Stacktrace}}) -> {"** Client ~tp stacktrace~n" "** ~tp~n", - [Name, Stacktrace]}. + [Name, error_logger:limit_term(Stacktrace)]}. %%----------------------------------------------------------------- %% Status information |