X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=rt%2Ft%2Fweb%2Fcompilation_errors.t;h=4fd9c40e93f89031f9fbdd9543f60076441797d4;hb=fc6209f398899f0211cfcedeb81a3cd65e04a941;hp=46a8628686f56bfe151aa1825eb55265103ff4ff;hpb=e70abd21bab68b23488f7ef1ee2e693a3b365691;p=freeside.git diff --git a/rt/t/web/compilation_errors.t b/rt/t/web/compilation_errors.t index 46a862868..4fd9c40e9 100644 --- a/rt/t/web/compilation_errors.t +++ b/rt/t/web/compilation_errors.t @@ -7,7 +7,7 @@ BEGIN { sub wanted { -f && /\.html$/ && $_ !~ /Logout.html$/; } - my $tests = 7; + my $tests = 4; find( sub { wanted() and $tests += 4 }, 'share/html/' ); plan tests => $tests; } @@ -36,15 +36,7 @@ is ($agent->{'status'}, 200, "Loaded a page"); # {{{ test a login # follow the link marked "Login" - -ok($agent->{form}->find_input('user')); - -ok($agent->{form}->find_input('pass')); -like ($agent->{'content'} , qr/username:/i); -$agent->field( 'user' => 'root' ); -$agent->field( 'pass' => 'password' ); -# the field isn't named, so we have to click link 0 -$agent->click(0); +$agent->login(root => 'password'); is($agent->{'status'}, 200, "Fetched the page ok"); like( $agent->{'content'} , qr/Logout/i, "Found a logout link");