summaryrefslogtreecommitdiff
path: root/lib/debugger
diff options
context:
space:
mode:
authorHans Bolinder <hasse@erlang.org>2019-10-18 13:21:02 +0200
committerHans Bolinder <hasse@erlang.org>2019-10-18 13:21:02 +0200
commit26e7e272f958014ab918300eb8749a2c511cf050 (patch)
tree9f4fce7ae9a559547a588e27a3dbf23221363eb8 /lib/debugger
parent92589811b0fc98b3efb8270712d9987e04fd4337 (diff)
parente4400ff2633ad885345fed0a73c27a957f8f0be0 (diff)
downloaderlang-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.erl3
-rw-r--r--lib/debugger/src/dbg_wx_trace.erl6
-rw-r--r--lib/debugger/src/dbg_wx_trace_win.erl8
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),