diff options
author | Kostis Sagonas <[email protected]> | 2010-02-07 21:15:42 +0200 |
---|---|---|
committer | Raimo Niskanen <[email protected]> | 2010-06-07 13:44:27 +0200 |
commit | 9e962d71c6320e224025f86070f4f9421b51fea0 (patch) | |
tree | 29e4814fb8df96b8ed2ae5dab63ce34ec24a1158 /lib/debugger/src/dbg_wx_interpret.erl | |
parent | 3647defb6f32d471355017967bdebb83b5c6224c (diff) | |
download | otp-9e962d71c6320e224025f86070f4f9421b51fea0.tar.gz otp-9e962d71c6320e224025f86070f4f9421b51fea0.tar.bz2 otp-9e962d71c6320e224025f86070f4f9421b51fea0.zip |
debugger: Clean up as suggested by tidier
Diffstat (limited to 'lib/debugger/src/dbg_wx_interpret.erl')
-rw-r--r-- | lib/debugger/src/dbg_wx_interpret.erl | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lib/debugger/src/dbg_wx_interpret.erl b/lib/debugger/src/dbg_wx_interpret.erl index f711ba679d..ffcfbcf36b 100644 --- a/lib/debugger/src/dbg_wx_interpret.erl +++ b/lib/debugger/src/dbg_wx_interpret.erl @@ -115,11 +115,11 @@ interpret_all(Dir, [File0|Files], Mode, Window, Errors) -> interpret_all(_Dir, [], _Mode, _Window, []) -> true; interpret_all(Dir, [], _Mode, Window, Errors) -> - Msg = lists:map(fun(Name) -> - File = filename:join(Dir, Name), - Error = format_error(int:interpretable(File)), - ["\n ",Name,": ",Error] - end, Errors), + Msg = [begin + File = filename:join(Dir, Name), + Error = format_error(int:interpretable(File)), + ["\n ",Name,": ",Error] + end || Name <- Errors], All = ["Error when interpreting: ", Msg], dbg_wx_win:confirm(Window, lists:flatten(All)), true. |