anchor.diff:      put(sock, Sock),
       put(sluice, Sluice),
       put(proxyPort, ProxyPort),
  -    spawn_link(fun() -> fitter(self()) end),
  -    {ok, empty, #state{0, <<>>, <<>>, []}}.
  +    {ok, empty, #state{}}.
   
  -empty({send, Msg}, State) ->
  -    #state{mll = MLL, body = Body} = State,
  +empty(timeout, State) ->
  +    Sock = get(sock),
  +    ok = gen_tcp:close(Sock),
  +    {stop, 'IDLE', State};
  +empty({send, NewMsg}, State) ->
  +    gen_server:cast(get(sluice), {queue, self()}),
  +    append(State, NewMsg).
   
  -ready({send, Msg}, State) ->
  +ready({send, NewMsg}, State) ->
  +    append(State, NewMsg).
   
  -ready(send, State) ->
  +full({send, NewMsg}, State) ->
  +    #state{msgs = Msgs} = State,
  +    {next_state, full, State#state{msgs = [NewMsg|Msgs]}}.
   
  -full({send, Msg}, State) ->
  -
  -full(send, State) ->
  -
  -state_name(_Event, State) ->
  -    {next_state, state_name, State}.
  -
  -handle_event({send, Msgs}, StateName, State
   handle_event(send, _StateName, State) ->
       #state{mll = MLL, body = Body, msgs = Msgs} = State,
       ProxyPort = get(proxyPort),
  
positive.code:          handle_event/3, handle_sync_event/4, handle_info/3,
           terminate/3, code_change/4]).
  
  -record(state, {count, mll, body, msgs}).
  
  -include("meeqo_config.hrl").
  
  -define(SOCKOPT, [{binary, {active, false}, {packet, 4},
                    {recbuf, ?PIPE_BUF},
                    {sndbuf, ?PIPE_BUF}
                   ]).
  
negative.code:     Parc = <<ProxyPort:16, MLLBytes:32, MLL/binary, Body/binary>>,
      Sock = get(sock),
      gen_tcp:send(Sock, Parc),
      {ok, <<"ok", _/binary>>} = gen_tcp:recv(Sock, 0),
      Sluice = get(sluice),
      case Msgs of
          [] ->
              gen_server:cast(Sluice, sent),
              {next_state, empty, #state{}, 30000};
          _ ->
              gen_server:cast(Sluice, {sent, self()}),
              concat(#state{msgs = Msgs})
      end;
  handle_event(_Event, StateName, State) ->
      {next_state, StateName, State}.
  
  