anchor.diff:      end.
   
   handle_connection(Socket, RemoteSocket) ->
  -    {Result, Packet} = gen_tcp:recv(Socket, 0, ?TIME_OUT),
  +    {Result, Packet} = gen_tcp:recv(Socket, 0, infinity),
       case Result of
           ok ->
               EncryptedPacket = << <<bnot X>> || <<X>> <= Packet>>,
  
positive.code:         error ->
              case Packet of
                  closed -> ok;
                  _Any -> error_msg("Receive data error, Reason = ~p~n",[Packet])
              end
      end.
  
  handle_remote_connection(RemoteSocket, Socket) ->
      {Result, Packet} = gen_tcp:recv(RemoteSocket, 0, ?TIME_OUT),
      %%Decryt the data
      case Result of
          ok ->
  
negative.code:         error ->
              case Packet of
                  closed -> ok;
                  _Any -> error_msg("Remote Receive data error, Reason = ~p~n",[Packet])
              end
      end.
      
  