diff options
| author | Dan Gudmundsson <[email protected]> | 2012-02-29 11:39:44 +0100 |
|---|---|---|
| committer | Dan Gudmundsson <[email protected]> | 2012-02-29 11:39:44 +0100 |
| commit | b59b1d1f2351879427349f803e491652314a8c1e (patch) | |
| tree | a9e4ee28c55b452c4b1311cf0b2b28c0470a760f /lib/debugger/src/dbg_iserver.erl | |
| parent | f06de6450bbbd324a0784780d892fa69908a2126 (diff) | |
| download | otp-b59b1d1f2351879427349f803e491652314a8c1e.tar.gz otp-b59b1d1f2351879427349f803e491652314a8c1e.tar.bz2 otp-b59b1d1f2351879427349f803e491652314a8c1e.zip | |
[debugger] Fixed disappearing breakpoints
Reported by Ricardo Catalinas Jiménez
Diffstat (limited to 'lib/debugger/src/dbg_iserver.erl')
| -rw-r--r-- | lib/debugger/src/dbg_iserver.erl | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/lib/debugger/src/dbg_iserver.erl b/lib/debugger/src/dbg_iserver.erl index 1bb73a43b9..31a856545f 100644 --- a/lib/debugger/src/dbg_iserver.erl +++ b/lib/debugger/src/dbg_iserver.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 1998-2011. All Rights Reserved. +%% Copyright Ericsson AB 1998-2012. 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 @@ -188,10 +188,7 @@ handle_call({new_break, Point, Options}, _From, State) -> handle_call(all_breaks, _From, State) -> {reply, State#state.breaks, State}; handle_call({all_breaks, Mod}, _From, State) -> - Reply = lists:filter(fun({{M,_L}, _Options}) -> - M =/= Mod - end, - State#state.breaks), + Reply = [Break || Break = {{M, _},_} <- State#state.breaks, M =:= Mod], {reply, Reply, State}; %% From Meta process |