diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/gen_server2.erl | 14 |
1 files changed, 13 insertions, 1 deletions
diff --git a/src/gen_server2.erl b/src/gen_server2.erl index a54df3b865..d6b09babc2 100644 --- a/src/gen_server2.erl +++ b/src/gen_server2.erl @@ -881,9 +881,21 @@ handle_common_reply(Reply, Msg, GS2State = #gs2_state { name = Name, time = Time1, debug = Debug1 }); {become, Mod, NState} -> + Debug1 = common_debug(Debug, fun print_event/3, Name, + {become, Mod, NState}), + loop(find_prioritisers( + GS2State #gs2_state { mod = Mod, + state = NState, + time = infinity, + debug = Debug1 })); + {become, Mod, NState, Time1} -> + Debug1 = common_debug(Debug, fun print_event/3, Name, + {become, Mod, NState}), loop(find_prioritisers( GS2State #gs2_state { mod = Mod, - state = NState })); + state = NState, + time = Time1, + debug = Debug1 })); _ -> handle_common_termination(Reply, Msg, GS2State) end. |