anchor.diff:  	    ct:fail("CLI Timeout")
       end,
   
  -    %%%---- subsystem "echo_n"
  +    %%%---- Channel 2(3): subsystem "echo_n"
       success = ssh_connection:subsystem(ConnectionRef, ChannelId1, "echo_n", infinity),
   
  -    %%%---- exec #1
  +    %%%---- Channel 3(3): exec. This closes itself.
       success = ssh_connection:exec(ConnectionRef, ChannelId2, "testing1.\n", infinity),
       receive
   	{ssh_cm, ConnectionRef, {data, ChannelId2, 0, <<"testing1",_/binary>>}} ->
  
positive.code: 						      {user_interaction, true},
  						      {user_dir, UserDir}]),
  
      {ok, ChannelId0} = ssh_connection:session_channel(ConnectionRef, infinity),
      {ok, ChannelId1} = ssh_connection:session_channel(ConnectionRef, infinity),
      {ok, ChannelId2} = ssh_connection:session_channel(ConnectionRef, infinity),
      {ok, ChannelId3} = ssh_connection:session_channel(ConnectionRef, infinity),
      {ok, ChannelId4} = ssh_connection:session_channel(ConnectionRef, infinity),
      {ok, ChannelId5} = ssh_connection:session_channel(ConnectionRef, infinity),
      {ok, _ChannelId6} = ssh_connection:session_channel(ConnectionRef, infinity),
  
      %%%---- shell
      ok = ssh_connection:shell(ConnectionRef,ChannelId0),
      receive
  	{ssh_cm,ConnectionRef, {data, ChannelId0, 0, <<"Eshell",_/binary>>}} ->
  
negative.code: 	    ct:fail("exit Timeout",[])
      end,
  
      %%---- Try that we can open one channel instead of the closed one
      success = ssh_connection:subsystem(ConnectionRef, ChannelId5, "echo_n", infinity),
  
      %%---- But not a fourth one...
      failure = ssh_connection:subsystem(ConnectionRef, ChannelId6, "echo_n", infinity),
  
      ssh:close(ConnectionRef),
      ssh:stop_daemon(Pid).
  