Extend gen_server timeout to 60 seconds

Some processes take longer than the default timeout if they
were paged out and need to be brought back in before acting
on new data.

src/stdinout.erl

@@ -6,6 +6,9 @@
 -export([reload/1]).
 -export([pipe/2]).
 -export([shutdown/1]).
+
+-define(TIMEOUT, 60000).
+
 %%====================================================================
 %% Starting
 %%====================================================================
@@ -22,15 +25,15 @@ start_link(GenServerName, Cmd, IP, Port, SocketCount) ->
 %% respawn all running processes
 %%====================================================================
 reload(Server) ->
-  gen_server:call(Server, reload).
+  gen_server:call(Server, reload, ?TIMEOUT).
 
 %%====================================================================
 %% stdin->stdout through pool or network
 %%====================================================================
 send({Host, Port}, Content) ->
   send(Host, Port, Content);
 send(Server, Content) ->
-  gen_server:call(Server, {stdin, Content}).
+  gen_server:call(Server, {stdin, Content}, ?TIMEOUT).
 
 %%====================================================================
 %% stdin->stdout through network