[PATCH] testbot/TestAgent: Fix the non-tunneling case.

[Francois Gouget]

The TestAgent server address is now stored in agenthost:agentport.

Signed-off-by: Francois Gouget 
---
 testbot/lib/WineTestBot/TestAgent.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/testbot/lib/WineTestBot/TestAgent.pm b/testbot/lib/WineTestBot/TestAgent.pm
index 15da924f..c717a02c 100644
--- a/testbot/lib/WineTestBot/TestAgent.pm
+++ b/testbot/lib/WineTestBot/TestAgent.pm
@@ -902,8 +902,8 @@ sub _Connect($)
       else
       {
         $Step = "create_socket";
-        $self->{fd} = &$create_socket(PeerHost => $self->{host},
-                                      PeerPort => $self->{port},
+        $self->{fd} = &$create_socket(PeerHost => $self->{agenthost},
+                                      PeerPort => $self->{agentport},
                                       Type => SOCK_STREAM);
         if (!$self->{fd})
         {