use Test::More;
my $browser = shift;
-my $s = Test::Harness::Selenium->new({
- host => 'localhost',
- port => $< + 60_000,
- browser_url => 'http://127.0.0.1:3000',
- browser => $browser,
-});
-$s->start_server;
-$s->run_tests_for('t/corpus/thselenium.html');
-$s->stop_server;
+my $s = Test::Harness::Selenium->new(
+ selenium_rc => {
+ host => '10.0.0.8',
+ port => $< + 6900,
+ start => 1,
+ xvnc_display => 1,
+ },
+ app_base => 'http://10.0.0.5:3000',
+ app_server_cmd => 'examples/THSelenium-Test/script/thselenium_test_server.pl',
+ browser => '*firefox',
+);
+$s->test_directory('t/corpus/');
done_testing;