diff options
author | Hans Bolinder <hasse@erlang.org> | 2019-10-18 13:21:02 +0200 |
---|---|---|
committer | Hans Bolinder <hasse@erlang.org> | 2019-10-18 13:21:02 +0200 |
commit | 26e7e272f958014ab918300eb8749a2c511cf050 (patch) | |
tree | 9f4fce7ae9a559547a588e27a3dbf23221363eb8 /lib/debugger | |
parent | 92589811b0fc98b3efb8270712d9987e04fd4337 (diff) | |
parent | e4400ff2633ad885345fed0a73c27a957f8f0be0 (diff) | |
download | erlang-26e7e272f958014ab918300eb8749a2c511cf050.tar.gz |
Merge branch 'maint'
* maint:
debugger: Print Unicode atoms consistently
Diffstat (limited to 'lib/debugger')
-rw-r--r-- | lib/debugger/src/dbg_wx_mon_win.erl | 3 | ||||
-rw-r--r-- | lib/debugger/src/dbg_wx_trace.erl | 6 | ||||
-rw-r--r-- | lib/debugger/src/dbg_wx_trace_win.erl | 8 |
3 files changed, 8 insertions, 9 deletions
diff --git a/lib/debugger/src/dbg_wx_mon_win.erl b/lib/debugger/src/dbg_wx_mon_win.erl index fcd954454b..84de762b65 100644 --- a/lib/debugger/src/dbg_wx_mon_win.erl +++ b/lib/debugger/src/dbg_wx_mon_win.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 2008-2017. All Rights Reserved. +%% Copyright Ericsson AB 2008-2019. All Rights Reserved. %% %% Licensed under the Apache License, Version 2.0 (the "License"); %% you may not use this file except in compliance with the License. @@ -85,7 +85,6 @@ init() -> -define(W, 800). -define(H, 390). -%% FIXME -define(autoId, 314). -define(stringsId, 271). diff --git a/lib/debugger/src/dbg_wx_trace.erl b/lib/debugger/src/dbg_wx_trace.erl index 25f32ca7e7..210987d3e6 100644 --- a/lib/debugger/src/dbg_wx_trace.erl +++ b/lib/debugger/src/dbg_wx_trace.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 2008-2018. All Rights Reserved. +%% Copyright Ericsson AB 2008-2019. All Rights Reserved. %% %% Licensed under the Apache License, Version 2.0 (the "License"); %% you may not use this file except in compliance with the License. @@ -518,7 +518,7 @@ gui_cmd({user_command, Cmd}, State) -> gui_cmd({edit, {Var, Value}}, State) -> Window = dbg_wx_trace_win:get_window(State#state.win), Val = case State#state.strings of - [] -> dbg_wx_win:to_string("~0lp",[Value]); + [] -> dbg_wx_win:to_string("~0ltp",[Value]); [str_on] -> dbg_wx_win:to_string("~0tp",[Value]) end, case dbg_wx_win:entry(Window, "Edit variable", Var, {term, Val}) of @@ -813,7 +813,7 @@ map(?STRNAME) -> str_on; % Strings map(str_on) -> ?STRNAME. p(#state{strings=[str_on]}) -> "~tp"; -p(#state{strings=[]}) -> "~lp". +p(#state{strings=[]}) -> "~ltp". %% gui_show_module(Win, Mod, Line, Cm, Pid, How) -> Win %% gui_show_module(Win, {Mod,Line}, _Reason, Cm, Pid, How) -> Win diff --git a/lib/debugger/src/dbg_wx_trace_win.erl b/lib/debugger/src/dbg_wx_trace_win.erl index 972a917728..f5e5fbc5bf 100644 --- a/lib/debugger/src/dbg_wx_trace_win.erl +++ b/lib/debugger/src/dbg_wx_trace_win.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 2008-2016. All Rights Reserved. +%% Copyright Ericsson AB 2008-2019. All Rights Reserved. %% %% Licensed under the Apache License, Version 2.0 (the "License"); %% you may not use this file except in compliance with the License. @@ -572,8 +572,8 @@ update_bindings(#winInfo{bind=#sub{out=BA}}, Bs) -> wxListCtrl:insertItem(BA, Row, ""), wxListCtrl:setItem(BA, Row, 0, dbg_wx_win:to_string(Var)), Format = case get(strings) of - [] -> "~999999lP"; - [str_on] -> "~999999tP" + [] -> "~0ltP"; + [str_on] -> "~0tP" end, wxListCtrl:setItem(BA, Row, 1, dbg_wx_win:to_string(Format,[Val, 20])), Row+1 @@ -866,7 +866,7 @@ handle_event(#wx{event=#wxList{type=command_list_item_selected, itemIndex=Row}}, Bs = get(bindings), {Var,Val} = lists:nth(Row+1, Bs), Str = case get(strings) of - [] -> io_lib:format("< ~s = ~lp~n", [Var, Val]); + [] -> io_lib:format("< ~s = ~ltp~n", [Var, Val]); [str_on] -> io_lib:format("< ~s = ~tp~n", [Var, Val]) end, eval_output(Wi, Str, bold), |