anchor.diff:  			    io:put_chars("WARNING: No EOF, but "
   					 "test_server node is down!\n");
   			false ->
  -			    tricky_print_data(Port)
  +			    tricky_print_data(Port, Timeout)
   		    end;
   		_ ->
  -		    tricky_print_data(Port)
  +		    tricky_print_data(Port, Timeout)
   	    end
       end.
   
  
positive.code:     ts_lib:progress(Vars, 1, "Command: ~s~n", [Command]),
      io:format(user, "Command: ~s~n",[Command]),
      Port = open_port({spawn, Command}, [stream, in, eof]),
      tricky_print_data(Port).
  
  tricky_print_data(Port) ->
      receive
  	{Port, {data, Bytes}} ->
  	    io:put_chars(Bytes),
  	    tricky_print_data(Port);
  	{Port, eof} ->
  	    Port ! {self(), close}, 
  	    receive
  
negative.code: 	    after 1 ->				% force context switch
  		    ok
  	    end
      after Timeout ->
  	    case erl_epmd:names() of
  		{ok,Names} ->
  		    case is_testnode_dead(Names) of
  