diff options
| author | Dan Gudmundsson <[email protected]> | 2013-01-15 09:19:32 +0100 |
|---|---|---|
| committer | Dan Gudmundsson <[email protected]> | 2013-01-15 09:19:32 +0100 |
| commit | 0324fe0502d843830e6fe128e307601f21a60f26 (patch) | |
| tree | 299db89395e593c0eded9790e69992259ca60058 /lib/debugger/src/dbg_wx_win.erl | |
| parent | 364ec900a6f974e7bc184bb3d5d67e85765353e0 (diff) | |
| parent | 7f048c5d71534d458351513e84bb879c47f2c76e (diff) | |
| download | otp-0324fe0502d843830e6fe128e307601f21a60f26.tar.gz otp-0324fe0502d843830e6fe128e307601f21a60f26.tar.bz2 otp-0324fe0502d843830e6fe128e307601f21a60f26.zip | |
Merge branch 'dgud/debugger/unicode/OTP-10679'
* dgud/debugger/unicode/OTP-10679:
debugger: View terms as unicode-strings
debugger: Fix code viewing on wxWidgets-2.9
debugger: Remove bad gs:call
debugger: Fix user evalution dependent of bindings in trace window
Diffstat (limited to 'lib/debugger/src/dbg_wx_win.erl')
| -rw-r--r-- | lib/debugger/src/dbg_wx_win.erl | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lib/debugger/src/dbg_wx_win.erl b/lib/debugger/src/dbg_wx_win.erl index faf3cc178f..3cb6edd953 100644 --- a/lib/debugger/src/dbg_wx_win.erl +++ b/lib/debugger/src/dbg_wx_win.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 2008-2010. All Rights Reserved. +%% Copyright Ericsson AB 2008-2013. All Rights Reserved. %% %% The contents of this file are subject to the Erlang Public License, %% Version 1.1, (the "License"); you may not use this file except in @@ -252,9 +252,9 @@ notify(Win,Message) -> %%-------------------------------------------------------------------- entry(Parent, Title, Prompt, {Type, Value}) -> - Ted = wxTextEntryDialog:new(Parent, to_string(Prompt), - [{caption, to_string(Title)}, - {value, to_string(Value)}]), + Ted = wxTextEntryDialog:new(Parent, to_string(Prompt), + [{caption, to_string(Title)}, + {value, to_string("~999999tp",Value)}]), case wxDialog:showModal(Ted) of ?wxID_OK -> @@ -306,7 +306,7 @@ to_string([]) -> ""; to_string(List) when is_list(List) -> List; to_string(Term) -> - io_lib:format("~p",[Term]). + io_lib:format("~tp",[Term]). to_string(Format,Args) -> io_lib:format(Format, Args). |