Merge branch 'anders/diameter/eval_clause/OTP-10685' into maint-r15

* anders/diameter/eval_clause/OTP-10685:
  vsn -> 1.3.1
  Update appup
  Traffic suite comments plus a minor match tweak
  Add a testcase
  Reverse swapped arguments

2 files changed, 8 insertions, 25 deletions

diff --git a/lib/diameter/src/base/diameter.appup.src b/lib/diameter/src/base/diameter.appup.src
index 5655f98c1b..a04a387918 100644
--- a/lib/diameter/src/base/diameter.appup.src
+++ b/lib/diameter/src/base/diameter.appup.src
@@ -2,7 +2,7 @@
 %%
 %% %CopyrightBegin%
 %%
-%% Copyright Ericsson AB 2010-2012. All Rights Reserved.
+%% Copyright Ericsson AB 2010-2013. 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
@@ -24,27 +24,9 @@
   {"0.10",  [{restart_application, diameter}]},
   {"1.0",   [{restart_application, diameter}]},
   {"1.1",   [{restart_application, diameter}]},
-  {"1.2",   [{load, diameter},
-             {load, diameter_capx},
-             {load, diameter_codec},
-             {load, diameter_peer},
-             {load, diameter_reg},
-             %% order significant from here
-             {load, diameter_session},
-             {load, diameter_peer_fsm},
-             {load, diameter_service},
-             {load, diameter_watchdog},
-             {load, diameter_config}]},
-  {"1.2.1", [{load, diameter},
-             {load, diameter_capx},
-             {load, diameter_peer},
-             {load, diameter_reg},
-             %% order significant from here
-             {load, diameter_session},
-             {load, diameter_peer_fsm},
-             {load, diameter_service},
-             {load, diameter_watchdog},
-             {load, diameter_config}]}
+  {"1.2",   [{restart_application, diameter}]},
+  {"1.2.1", [{restart_application, diameter}]},
+  {"1.3",   [{load_module, diameter_service}]}
  ],
  [
   {"0.9",   [{restart_application, diameter}]},
@@ -52,6 +34,7 @@
   {"1.0",   [{restart_application, diameter}]},
   {"1.1",   [{restart_application, diameter}]},
   {"1.2",   [{restart_application, diameter}]},
-  {"1.2.1", [{restart_application, diameter}]}
+  {"1.2.1", [{restart_application, diameter}]},
+  {"1.3",   [{load_module, diameter_service}]}
  ]
 }.
diff --git a/lib/diameter/src/base/diameter_service.erl b/lib/diameter/src/base/diameter_service.erl
index a4a0b80348..66c526b379 100644
--- a/lib/diameter/src/base/diameter_service.erl
+++ b/lib/diameter/src/base/diameter_service.erl
@@ -1,7 +1,7 @@
 %%
 %% %CopyrightBegin%
 %%
-%% Copyright Ericsson AB 2010-2012. All Rights Reserved.
+%% Copyright Ericsson AB 2010-2013. 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
@@ -2049,7 +2049,7 @@ request_cb({eval_packet, RC, F}, App, Mask, T, TC, Fs, Pkt) ->
     request_cb(RC, App, Mask, T, TC, [F|Fs], Pkt);
 
 request_cb({eval, RC, F}, App, Mask, T, TC, Fs, Pkt) ->
-    request_cb(RC, App, Mask, T, TC, Pkt, Fs),
+    request_cb(RC, App, Mask, T, TC, Fs, Pkt),
     diameter_lib:eval(F).
 
 %% protocol_error/5