anchor.diff:  
   
   % Enqueues a new client command
  -enqueue_command(State, Client, Cmd) ->
  +enqueue_command(State, Client) ->
       % Get the first client in the queue
       Q = State#state.cmd_queue,
   
       % Add to the end of the queue
  -    NQ = queue:in({Client, Cmd}, Q),
  +    NQ = queue:in(Client, Q),
       State#state{cmd_queue=NQ}.
   
   
  
positive.code: % with no commands or data queued.
  fail_all_queued(State) ->
      % Fail each of the commands in the queue
      [gen_server:reply(Client, {error, command_failed}) || {Client, _} <- queue:to_list(State#state.cmd_queue)],
  
      % Reset the state
      State#state{sock=undefined, cmd_queue=queue:new(), buf=[]}.
  
negative.code:         port,
  
          % Queue of commands, FIFO
          % Each item is just a client to respond to
          cmd_queue,
  
          % Buffer of incoming data
  