[Rt-commit] rtfm branch, master, updated. 71c2c88bc201061568e5d89758b3807f8f463e1f
? sunnavy
sunnavy at bestpractical.com
Thu Jul 15 23:22:49 EDT 2010
The branch, master has been updated
via 71c2c88bc201061568e5d89758b3807f8f463e1f (commit)
from 49b11181672a3144f8919dae99c55291ac1c095f (commit)
Summary of changes:
t/04interface.t | 6 ++----
t/06search_interface.t | 6 ++----
t/3upload-customfields.t | 6 ++----
3 files changed, 6 insertions(+), 12 deletions(-)
- Log -----------------------------------------------------------------
commit 71c2c88bc201061568e5d89758b3807f8f463e1f
Author: sunnavy <sunnavy at bestpractical.com>
Date: Fri Jul 16 11:21:02 2010 +0800
we has $m->login
diff --git a/t/04interface.t b/t/04interface.t
index 9794ee6..977ea7e 100644
--- a/t/04interface.t
+++ b/t/04interface.t
@@ -4,7 +4,7 @@ use strict;
use warnings;
use lib 't/lib';
-use RT::FM::Test tests => 56;
+use RT::FM::Test tests => 55;
use RT::CustomField;
use RT::EmailParser;
@@ -162,9 +162,7 @@ ok($ret, "Test ticket for articles created: $msg");
#### Right. That's our data. Now begin the real testing.
isa_ok($m, 'Test::WWW::Mechanize');
-ok(1, "Connecting to ".$url);
-$m->get( $url."?user=root;pass=password" );
-$m->content_like(qr/Logout/, 'we did log in');
+ok($m->login, 'logged in');
$m->follow_link_ok({text => 'RTFM'}, 'UI -> RTFM');
$m->content_contains($article3->Name);
$m->follow_link_ok( {text => $article3->Name}, 'RTFM -> '. $article3->Name );
diff --git a/t/06search_interface.t b/t/06search_interface.t
index 476b533..1afe408 100644
--- a/t/06search_interface.t
+++ b/t/06search_interface.t
@@ -4,7 +4,7 @@ use strict;
use warnings;
use lib 't/lib';
-use RT::FM::Test tests => 25;
+use RT::FM::Test tests => 24;
use RT::CustomField;
use RT::Queue;
@@ -106,9 +106,7 @@ ok($ret, "article 3 created");
ok($ret, "article 4 created");
isa_ok($m, 'Test::WWW::Mechanize');
-ok(1, "Connecting to ".$url);
-$m->get( $url."?user=root;pass=password" );
-$m->content_like(qr/Logout/, 'we did log in');
+ok($m->login, 'logged in');
$m->follow_link_ok({text => 'RTFM'}, 'UI -> RTFM');
$m->follow_link_ok( {text => 'Articles'}, 'RTFM -> Articles');
$m->follow_link_ok( {text => 'in class '.$class->Name}, 'Articles in class '.$class->Name);
diff --git a/t/3upload-customfields.t b/t/3upload-customfields.t
index f8d4cbb..e0d47be 100644
--- a/t/3upload-customfields.t
+++ b/t/3upload-customfields.t
@@ -4,7 +4,7 @@ use strict;
use warnings;
use lib 't/lib';
-use RT::FM::Test tests => 22;
+use RT::FM::Test tests => 21;
$RT::Test::SKIP_REQUEST_WORK_AROUND = 1;
use RT;
@@ -25,9 +25,7 @@ ok($ret, "Test class created");
my ($url, $m) = RT::Test->started_ok;
isa_ok($m, 'Test::WWW::Mechanize');
-ok(1, "Connecting to $url");
-$m->get( "$url?user=root;pass=password" );
-$m->content_like(qr/Logout/, 'we did log in');
+ok($m->login, 'logged in');
$m->follow_link_ok( { text => 'Configuration' } );
$m->title_is(q/RT Administration/, 'admin screen');
$m->follow_link_ok( { text => 'Custom Fields' } );
-----------------------------------------------------------------------
More information about the Rt-commit
mailing list