diff options
author | Hans Bolinder <[email protected]> | 2017-07-06 12:48:00 +0200 |
---|---|---|
committer | Siri Hansen <[email protected]> | 2017-09-05 11:02:26 +0200 |
commit | 6086776a4b8c953702cac7bcc2763cd1ad259e88 (patch) | |
tree | de2c07ba7a19312d24dfa837fbf44c7b9f7f0257 /lib/stdlib/src/gen_server.erl | |
parent | d88c1c73f733f57e1a176639186bd5d99d585a12 (diff) | |
download | otp-6086776a4b8c953702cac7bcc2763cd1ad259e88.tar.gz otp-6086776a4b8c953702cac7bcc2763cd1ad259e88.tar.bz2 otp-6086776a4b8c953702cac7bcc2763cd1ad259e88.zip |
stdlib : Improve handling of Unicode
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 a3d53efd0d..c789613702 100644 --- a/lib/stdlib/src/gen_server.erl +++ b/lib/stdlib/src/gen_server.erl @@ -621,7 +621,7 @@ try_dispatch(Mod, Func, Msg, State) -> case erlang:function_exported(Mod, handle_info, 2) of false -> error_logger:warning_msg("** Undefined handle_info in ~p~n" - "** Unhandled message: ~p~n", + "** Unhandled message: ~tp~n", [Mod, Msg]), {ok, {noreply, State}}; true -> @@ -882,9 +882,9 @@ error_info(Reason, Name, From, Msg, State, Debug) -> {ClientFmt, ClientArgs} = client_stacktrace(From), LimitedState = error_logger:limit_term(State), error_logger:format("** Generic server ~p terminating \n" - "** Last message in was ~p~n" - "** When Server state == ~p~n" - "** Reason for termination == ~n** ~p~n" ++ ClientFmt, + "** Last message in was ~tp~n" + "** When Server state == ~tp~n" + "** Reason for termination == ~n** ~tp~n" ++ ClientFmt, [Name, Msg, LimitedState, Reason1] ++ ClientArgs), sys:print_log(Debug), ok. @@ -898,11 +898,11 @@ client_stacktrace(From) when is_pid(From), node(From) =:= node() -> {"** Client ~p is dead~n", [From]}; [{current_stacktrace, Stacktrace}, {registered_name, []}] -> {"** Client ~p stacktrace~n" - "** ~p~n", + "** ~tp~n", [From, Stacktrace]}; [{current_stacktrace, Stacktrace}, {registered_name, Name}] -> {"** Client ~p stacktrace~n" - "** ~p~n", + "** ~tp~n", [Name, Stacktrace]} end; client_stacktrace(From) when is_pid(From) -> |