anchor.diff:  							SendData)}
   			  end, SendList),
   	    FlowCtrlMsgs = flow_control(Replies, 
  -					Channel#channel{flow_control = From}, 
  +					Channel,
   					Cache),
   	    {{replies, Replies ++ FlowCtrlMsgs}, Connection};
   	undefined ->
  
positive.code: flow_control([], Channel, Cache) ->
      ssh_channel:cache_update(Cache, Channel),
      [];
  flow_control([_|_], #channel{flow_control = From} = Channel, Cache) ->
      case From of
  	undefined ->
  	    [];
  	_ ->
  	    [{flow_control, Cache,  Channel, From, ok}]
      end.
  
  encode_pty_opts(Opts) ->
      Bin = list_to_binary(encode_pty_opts2(Opts)),
  
negative.code:     
      case ssh_channel:cache_lookup(Cache, ChannelId) of
  	#channel{remote_id = Id} = Channel0 ->
  	    {SendList, Channel} = update_send_window(Channel0#channel{flow_control = From}, DataType,
  						     Data, Connection),
  	    Replies = 
  		lists:map(fun({SendDataType, SendData}) -> 
  