anchor.diff:  			State
   	end,
   
  -	{noreply, State};
  +	{noreply, State1};
   
   handle_info(Info, State) ->
   	lager:warning("Unhandled message: ~p", [Info]),
  
positive.code: %% --------------------------------------------------------------------------------------------------------------------
  
  % Decrypt message
  aes_decrypt(Packet, #state{aes_key = AESKey, aes_vector = AESVector}) ->
  	%TODO: Warning: crypto:aes_cbc_128_decrypt/3 is deprecated and will be removed in in a future release; use crypto:block_decrypt/4
  	Decrypted = crypto:aes_cbc_128_decrypt(AESKey, AESVector, Packet),
  
  	% Strip padding added by OpenSSL's AES algorithm.
  	PaddingByteCount = binary:last(Decrypted),
  
negative.code: 	{Messages, Cont} = netstring:decode(data, State#state.netstring_cont),
  	State1 = State#state{netstring_cont = Cont},
  
    DecodedMessages = [json_to_envelope(Message) || Message <- Messages],
  
  	%TODO: Send the messages to the client connection pid.
  
  	{noreply, State1};
  