anchor.diff:  				IV = crypto:rand_bytes(16),
   
   				meck:expect(fake_transport, send, fun(_Socket, Message) ->
  -					Expected = netstring:encode(aes_encrypt(<<"{\"foo\":\"Bar!\"}">>, Key, IV)),
  +					Expected = netstring:encode(aes_encrypt(<<"{\"type\":\"undefined\",\"contents\":{\"foo\":\"Bar!\"}}">>, Key, IV)),
   					?assertEqual(Expected, Message)
   				end),
   				State = #state{
  
positive.code: 		{ "can send via ssl",
  			fun() ->
  				meck:expect(fake_transport, send, fun(_Socket, Message) ->
  					%% FIXME: update to use envelope record
  					Expected = <<"14:{\"foo\":\"Bar!\"},">>,
  					?assertEqual(Expected, Message)
  				end),
  				State = #state{ socket = fake_socket, transport = fake_transport},
  				pre_channels_proto:handle_cast({send, [{foo, <<"Bar!">>}]}, State),
  				?assert(meck:validate(fake_transport))
  			end
  		},
  
negative.code: 					aes_key = Key,
  					aes_vector = IV
  				},
  				pre_channels_proto:handle_cast({send, #envelope{contents = [{foo, <<"Bar!">>}]}}, State),
  				?assert(meck:validate(fake_transport))
  			end
  		},
  