Fixing set_cook on both cook and gen_media.

This is to fix the case where an agent rejects a call.
OpenACD · Apr 19, 2012 · 52ac4bf · 52ac4bf
1 parent 37c82a9
commit 52ac4bf
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 1 deletion.
diff --git a/src/cook.erl b/src/cook.erl
@@ -145,6 +145,7 @@ init([Call, InRecipe, Queue, Qpid, {_Priority, {MSec, Sec, _MsSec}} = Key]) ->
 					do_recipe(OptRecipe, 0, Qpid, Call)
 			end,
 			State = #state{recipe=Recipe, call=Call, queue=Queue, qpid = Qpid, tref=Tref, key = Key, callid = CallRec#call.id},
+			gen_media:set_cook(Call,self()),
 			{ok, State}
 	catch
 		Why:Reason ->

diff --git a/src/gen_media.erl b/src/gen_media.erl
@@ -875,7 +875,7 @@ inqueue({{'$gen_media', set_cook}, CookPid}, {BaseState, Internal}) ->
 	Newmon = erlang:monitor(process, CookPid),
 	NewCall = Call#call{cook = CookPid},
 	NewInternal = Internal#inqueue_state{cook_mon = Newmon, cook = CookPid},
-	NewBase = BaseState#base_state{callrec = Call},
+	NewBase = BaseState#base_state{callrec = NewCall},
 	{next_state, inqueue, {NewBase, NewInternal}};
 
 inqueue({{'$gen_media', Command}, _}, State) ->