Bläddra i källkod

Move no server error message test to assuage the recorder

Daniel Gempesaw 11 år sedan
förälder
incheckning
a64daf643c
1 ändrade filer med 17 tillägg och 18 borttagningar
  1. 17 18
      t/01-driver.t

+ 17 - 18
t/01-driver.t

@@ -36,24 +36,6 @@ my $driver = Selenium::Remote::Driver->new(browser_name => 'firefox');
 my $website = 'http://localhost:63636';
 my $ret;
 
-ERROR_MESSAGE: {
-    my $unused_port = do {
-        my $l = IO::Socket::INET->new(
-            Listen    => 5,
-            LocalHost => '127.0.0.1',
-            LocalPort => 0,
-            Proto     => 'tcp',
-            ReuseAddr => 1,
-        ) or die $!;
-        $l->sockport;
-    };
-    eval {
-        my $sel = Selenium::Remote::Driver->new(
-                                    host => 'localhost', port => $unused_port);
-    };
-    unlike($@, qr/Use of uninitialized value/, "not unhelpful message");
-}
-
 DESIRED_CAPABILITIES: {
     # We're using a different test method for these because we needed
     # to inspect payload of the POST to /session, and the method of
@@ -418,4 +400,21 @@ QUIT: {
     ok((not defined $driver->{'session_id'}), 'Killed the remote session');
 }
 
+NO_SERVER_ERROR_MESSAGE: {
+    my $unused_port = do {
+        my $l = IO::Socket::INET->new(
+            Listen    => 5,
+            LocalHost => '127.0.0.1',
+            LocalPort => 0,
+            Proto     => 'tcp',
+            ReuseAddr => 1,
+        ) or die $!;
+        $l->sockport;
+    };
+    eval {
+        my $sel = Selenium::Remote::Driver->new(port => $unused_port);
+    };
+    unlike($@, qr/Use of uninitialized value/, "Error message for no server at host/port combination is helpful");
+}
+
 done_testing;