diff options
| author | Siri Hansen <[email protected]> | 2017-06-09 18:08:53 +0200 |
|---|---|---|
| committer | Siri Hansen <[email protected]> | 2017-06-16 11:52:21 +0200 |
| commit | 74b7b4192193397aabc563872ef6061cddd595a5 (patch) | |
| tree | e9bb32e908ff39b5a36a5518b3ee98a81656be71 /lib/observer/src/etop.erl | |
| parent | 24b35460a12799f595da2430cc2904c88873c7a7 (diff) | |
| download | otp-74b7b4192193397aabc563872ef6061cddd595a5.tar.gz otp-74b7b4192193397aabc563872ef6061cddd595a5.tar.bz2 otp-74b7b4192193397aabc563872ef6061cddd595a5.zip | |
[etop] Fix handling of unicode atoms
Print function names and registered names with ~tw.
Open dump file with encoding utf8.
Diffstat (limited to 'lib/observer/src/etop.erl')
| -rw-r--r-- | lib/observer/src/etop.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/observer/src/etop.erl b/lib/observer/src/etop.erl index 3d56a1e64d..f0990f1f25 100644 --- a/lib/observer/src/etop.erl +++ b/lib/observer/src/etop.erl @@ -81,7 +81,7 @@ check_runtime_config(accumulate,A) when A=:=true; A=:=false -> ok; check_runtime_config(_Key,_Value) -> error. dump(File) -> - case file:open(File,[write]) of + case file:open(File,[write,{encoding,utf8}]) of {ok,Fd} -> etop_server ! {dump,Fd}; Error -> Error end. @@ -161,7 +161,7 @@ data_handler(Reader, Opts) -> {'EXIT', EPid, Reason} when EPid == Opts#opts.out_proc -> case Reason of normal -> ok; - _ -> io:format("Output server crashed: ~p~n",[Reason]) + _ -> io:format("Output server crashed: ~tp~n",[Reason]) end, stop(Opts), out_proc_stopped; |