aboutsummaryrefslogtreecommitdiffstats
path: root/lib/debugger/src/dbg_iserver.erl
diff options
context:
space:
mode:
authorDan Gudmundsson <[email protected]>2012-03-21 10:23:21 +0100
committerDan Gudmundsson <[email protected]>2012-03-21 10:23:21 +0100
commit17aca0a257880761aa3e86da7ffa906269ed947c (patch)
tree31d4731db6747152d427a209ba4b85417760f568 /lib/debugger/src/dbg_iserver.erl
parent2fc45e219d8957803ea77f4bac62f238424dbda4 (diff)
parentb59b1d1f2351879427349f803e491652314a8c1e (diff)
downloadotp-17aca0a257880761aa3e86da7ffa906269ed947c.tar.gz
otp-17aca0a257880761aa3e86da7ffa906269ed947c.tar.bz2
otp-17aca0a257880761aa3e86da7ffa906269ed947c.zip
Merge branch 'dgud/debugger/breakpoints_bug/OTP-9950' into maint
* dgud/debugger/breakpoints_bug/OTP-9950: [debugger] Fixed disappearing breakpoints
Diffstat (limited to 'lib/debugger/src/dbg_iserver.erl')
-rw-r--r--lib/debugger/src/dbg_iserver.erl7
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