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_mon.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_mon.erl')
-rw-r--r-- | lib/debugger/src/dbg_wx_mon.erl | 19 |
1 files changed, 8 insertions, 11 deletions
diff --git a/lib/debugger/src/dbg_wx_mon.erl b/lib/debugger/src/dbg_wx_mon.erl index 3f55c38d35..6bdec994b1 100644 --- a/lib/debugger/src/dbg_wx_mon.erl +++ b/lib/debugger/src/dbg_wx_mon.erl @@ -170,7 +170,7 @@ init2(CallingPid, Mode, SFile, GS) -> CallingPid ! {initialization_complete, self()}, if - SFile==default -> + SFile =:= default -> loop(State3); true -> loop(load_settings(SFile, State3)) @@ -268,7 +268,7 @@ gui_cmd(ignore, State) -> State; gui_cmd(stopped, State) -> if - State#state.starter==true -> int:stop(); + State#state.starter =:= true -> int:stop(); true -> int:auto_attach(false) end, exit(stop); @@ -420,9 +420,9 @@ gui_cmd({'Trace Window', TraceWin}, State) -> State2; gui_cmd({'Auto Attach', When}, State) -> if - When==[] -> int:auto_attach(false); + When =:= [] -> int:auto_attach(false); true -> - Flags = lists:map(fun(Name) -> map(Name) end, When), + Flags = [map(Name) || Name <- When], int:auto_attach(Flags, trace_function(State)) end, State; @@ -691,12 +691,12 @@ load_settings2(Settings, State) -> Break, int:break(Mod, Line), if - Status==inactive -> + Status =:= inactive -> int:disable_break(Mod, Line); true -> ignore end, if - Action/=enable -> + Action =/= enable -> int:action_at_break(Mod,Line,Action); true -> ignore end, @@ -715,10 +715,7 @@ save_settings(SFile, State) -> int:auto_attach(), int:stack_trace(), State#state.backtrace, - lists:map(fun(Mod) -> - int:file(Mod) - end, - int:interpreted()), + [int:file(Mod) || Mod <- int:interpreted()], int:all_breaks()}, Binary = term_to_binary({debugger_settings, Settings}), @@ -741,7 +738,7 @@ registered_name(Pid) -> Node = node(Pid), if - Node==node() -> + Node =:= node() -> case erlang:process_info(Pid, registered_name) of {registered_name, Name} -> Name; _ -> undefined |