Allow ht:load_tree() 30 seconds to finish.

Default 5 seconds was not enough on a tree with around 5.2M entries.

1 files changed, 3 insertions, 3 deletions

diff --git a/src/ht.erl b/src/ht.erl
index 0e00440..5d56bad 100644
--- a/src/ht.erl
+++ b/src/ht.erl
@@ -35,7 +35,7 @@
          code_change/3]).
 -export([testing_get_state/0, print_tree/0, print_tree/1]).
 
--import(stacktrace, [call/2]).
+-import(stacktrace, [call/2, call/3]).
 -include_lib("eunit/include/eunit.hrl").
 -import(lists, [foreach/2, foldl/3, reverse/1]).
 
@@ -55,9 +55,9 @@ start_link() ->
 start_link(NEntries) ->
     gen_server:start_link({local, ?MODULE}, ?MODULE, [NEntries], []).
 reset_tree(Arg) ->
-    gen_server:call(?MODULE, {reset_tree, Arg}, infinity).
+    call(?MODULE, {reset_tree, Arg}, infinity).
 load_tree(Version) ->
-    case call(?MODULE, {load_tree, Version}) of
+    case call(?MODULE, {load_tree, Version}, 30000) of
         eagain ->
             load_tree(Version);
         Result ->