From 8a7b17a6d63377c323ab137ca8c0847280f9e24a Mon Sep 17 00:00:00 2001
From: Anders Svensson <anders@erlang.org>
Date: Fri, 16 Dec 2011 17:53:52 +0100
Subject: Update watchdog suite

---
 lib/diameter/test/diameter_watchdog_SUITE.erl | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

(limited to 'lib/diameter')

diff --git a/lib/diameter/test/diameter_watchdog_SUITE.erl b/lib/diameter/test/diameter_watchdog_SUITE.erl
index b40d7c104d..ff40326947 100644
--- a/lib/diameter/test/diameter_watchdog_SUITE.erl
+++ b/lib/diameter/test/diameter_watchdog_SUITE.erl
@@ -306,11 +306,8 @@ watchdog(Type, Ref, TPid, Wd) ->
     Opts = [{transport_module, ?MODULE},
             {transport_config, TPid},
             {watchdog_timer, Wd}],
-    monitor(diameter_watchdog:start({Type, Ref},
-                                    {false, Opts, false, ?SERVICE})).
-
-monitor(Pid) ->
-    erlang:monitor(process, Pid),
+    {_MRef, Pid} = diameter_watchdog:start({Type, Ref},
+                                           {false, Opts, false, ?SERVICE}),
     Pid.
 
 %% ===========================================================================
@@ -350,6 +347,10 @@ init(_, _, TPid, _) ->
     monitor(TPid),
     3.
 
+monitor(Pid) ->
+    erlang:monitor(process, Pid),
+    Pid.
+
 %% Generate a unique hostname for the faked peer.
 hostname() ->
     lists:flatten(io_lib:format("~p-~p-~p", tuple_to_list(now()))).
-- 
cgit v1.2.3