summaryrefslogtreecommitdiff
path: root/rt/t/web/basic.t
diff options
context:
space:
mode:
Diffstat (limited to 'rt/t/web/basic.t')
-rw-r--r--rt/t/web/basic.t11
1 files changed, 2 insertions, 9 deletions
diff --git a/rt/t/web/basic.t b/rt/t/web/basic.t
index bc4d655..3f94e73 100644
--- a/rt/t/web/basic.t
+++ b/rt/t/web/basic.t
@@ -4,7 +4,7 @@ use strict;
use warnings;
use Encode;
-use RT::Test tests => 24;
+use RT::Test tests => 21;
$RT::Test::SKIP_REQUEST_WORK_AROUND = 1;
my ($baseurl, $agent) = RT::Test->started_ok;
@@ -20,15 +20,8 @@ diag $url if $ENV{TEST_VERBOSE};
# test a login
{
- ok($agent->{form}->find_input('user'));
- ok($agent->{form}->find_input('pass'));
-
- ok($agent->{'content'} =~ /username:/i);
- $agent->field( 'user' => 'root' );
- $agent->field( 'pass' => 'password' );
-
+ $agent->login('root' => 'password');
# the field isn't named, so we have to click link 0
- $agent->click(0);
is( $agent->{'status'}, 200, "Fetched the page ok");
ok( $agent->{'content'} =~ /Logout/i, "Found a logout link");
}