-#!/usr/bin/perl
use strict;
use warnings;
# Database details
$m->content_contains('DatabaseName');
- $m->submit();
+ if (RT->Config->Get('DatabaseType') eq 'SQLite') {
+ $m->submit;
+ } else {
+ $m->submit_form(with_fields => {
+ DatabaseAdmin => $ENV{RT_DBA_USER},
+ DatabaseAdminPassword => $ENV{RT_DBA_PASSWORD},
+ DatabasePassword => "rt_pass",
+ });
+ }
$m->content_contains('Connection succeeded');
$m->submit_form_ok({ button => 'Next' });
ok $m->login(), 'logged in';
}
+RT::Test::__drop_database();
undef $m;
done_testing;