Make plop a gen_server.

1 files changed, 5 insertions, 14 deletions

diff --git a/src/test/plop_test.erl b/src/test/plop_test.erl
index 6b612dd..83b5240 100644
--- a/src/test/plop_test.erl
+++ b/src/test/plop_test.erl
@@ -12,16 +12,12 @@ adding_test_() ->
       end}}.
      
 start() ->
-    plop:start("test/rsakey.pem", "sikrit").
+    plop:start_link("test/rsakey.pem", "sikrit").
 
-stop(Pid) ->
-    Pid ! {self(), quit},
-    [?_assert(receive
-                  {ok, quit} -> true
-              after 500 -> false
-              end)].
+stop(_Pid) ->
+    [?_assertEqual({ok, plop}, plop:stop())].
 
-test_add(Pid) ->
+test_add(_Pid) ->
     TestVector =
         <<1,247,141,118,3,148,171,128,29,143,106,97,200,179,204,166,242,98,70,185,
           231,78,193,39,12,245,82,254,230,136,69,69,0,0,0,0,0,0,0,18,103,71,39,45,
@@ -43,11 +39,6 @@ test_add(Pid) ->
     PlopData = #plop_data{signature_type = ?PLOP_SIGTYPE_TEST,
                           timestamp = 4711,
                           entry = Entry},
-    Pid ! {self(), {add, PlopData}},
-    Res = receive M -> M end,
-    %% {ok, Dev} = file:open("d", write),
-    %% io:format(Dev, "~p~n", [Res]),
-    %% file:close(Dev),
-    [?_assertEqual({ok, TestVector}, Res)].
+    [?_assertEqual(TestVector, plop:add(PlopData))].
 
 % Helpers.