Merge pull request #7 from spawngrid/fix-tuple-call-r16

Fixes deprecated tuple call syntax issue in seresye_agenda
spawngrid · Feb 1, 2012 · 75d333b · 75d333b
2 parents b1779e0 + 130c2a4
commit 75d333b
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/src/seresye_agenda.erl b/src/seresye_agenda.erl
@@ -310,5 +310,8 @@ exec(EngineState0, R) ->
 
 %% Fun = {Module, Function} or
 %% Fun = fun (...)
-execute_rule(EngineState, {Fun, Args, _, _}) ->
+execute_rule(EngineState, {{M,F}, Args, X1, X2}) ->
+    L = length(Args) + 1,
+    execute_rule(EngineState, {fun M:F/L, Args, X1, X2});
+execute_rule(EngineState, {Fun, Args, _, _}) when is_function(Fun) ->
     apply(Fun, [EngineState | Args]).