X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=rt%2Ft%2Fweb%2Fconfig_tab_right.t;h=361506c10f68618d2413d01319b90e4f7c1c8833;hb=6587f6ba7d047ddc1686c080090afe7d53365bd4;hp=4dc9ec082601fcb627c9c04fdf02348288a95a9b;hpb=47153aae5c2fc00316654e7277fccd45f72ff611;p=freeside.git diff --git a/rt/t/web/config_tab_right.t b/rt/t/web/config_tab_right.t index 4dc9ec082..361506c10 100644 --- a/rt/t/web/config_tab_right.t +++ b/rt/t/web/config_tab_right.t @@ -2,11 +2,11 @@ use strict; use warnings; -use RT::Test tests => 8; +use RT::Test nodata => 1, tests => 10; my ($uname, $upass, $user) = ('tester', 'tester'); { - $user = RT::User->new($RT::SystemUser); + $user = RT::User->new(RT->SystemUser); my ($status, $msg) = $user->Create( Name => $uname, Password => $upass, @@ -20,7 +20,7 @@ my ($baseurl, $m) = RT::Test->started_ok; ok $m->login($uname, $upass), "logged in"; { - $m->content_unlike(qr/Configuration/, 'no configuration'); + $m->content_lacks('Configuration', 'no configuration tab'); $m->get('/Admin/'); is $m->status, 403, 'no access to /Admin/'; } @@ -33,7 +33,7 @@ RT::Test->set_rights( { $m->get('/'); - $m->content_like(qr/Configuration/, 'configuration is there'); + $m->content_contains('Configuration', 'configuration tab is there'); $m->follow_link_ok({text => 'Configuration'}); is $m->status, 200, 'user has access to /Admin/';