diff options
Diffstat (limited to 'rt/t/web/custom_frontpage.t')
-rw-r--r-- | rt/t/web/custom_frontpage.t | 61 |
1 files changed, 0 insertions, 61 deletions
diff --git a/rt/t/web/custom_frontpage.t b/rt/t/web/custom_frontpage.t deleted file mode 100644 index 79ea56629..000000000 --- a/rt/t/web/custom_frontpage.t +++ /dev/null @@ -1,61 +0,0 @@ -#!/usr/bin/perl -w -use strict; - -use RT::Test tests => 7; -my ($baseurl, $m) = RT::Test->started_ok; - -my $url = $m->rt_base_url; - -my $user_obj = RT::User->new($RT::SystemUser); -my ($ret, $msg) = $user_obj->LoadOrCreateByEmail('customer@example.com'); -ok($ret, 'ACL test user creation'); -$user_obj->SetName('customer'); -$user_obj->SetPrivileged(1); -($ret, $msg) = $user_obj->SetPassword('customer'); -$user_obj->PrincipalObj->GrantRight(Right => 'LoadSavedSearch'); -$user_obj->PrincipalObj->GrantRight(Right => 'EditSavedSearches'); -$user_obj->PrincipalObj->GrantRight(Right => 'CreateSavedSearch'); -$user_obj->PrincipalObj->GrantRight(Right => 'ModifySelf'); - -ok $m->login( customer => 'customer' ), "logged in"; - -$m->get ( $url."Search/Build.html"); - -#create a saved search -$m->form_name ('BuildQuery'); - -$m->field ( "ValueOfAttachment" => 'stupid'); -$m->field ( "SavedSearchDescription" => 'stupid tickets'); -$m->click_button (name => 'SavedSearchSave'); - -$m->get ( $url.'Prefs/MyRT.html' ); -$m->content_like (qr/stupid tickets/, 'saved search listed in rt at a glance items'); - -ok $m->login, 'we did log in as root'; - -$m->get ( $url.'Prefs/MyRT.html' ); -$m->form_name ('SelectionBox-body'); -# can't use submit form for mutli-valued select as it uses set_fields -$m->field ('body-Selected' => ['component-QuickCreate', 'system-Unowned Tickets', 'system-My Tickets']); -$m->click_button (name => 'remove'); -$m->form_name ('SelectionBox-body'); -#$m->click_button (name => 'body-Save'); -$m->get ( $url ); -$m->content_lacks ('highest priority tickets', 'remove everything from body pane'); - -$m->get ( $url.'Prefs/MyRT.html' ); -$m->form_name ('SelectionBox-body'); -$m->field ('body-Available' => ['component-QuickCreate', 'system-Unowned Tickets', 'system-My Tickets']); -$m->click_button (name => 'add'); - -$m->form_name ('SelectionBox-body'); -$m->field ('body-Selected' => ['component-QuickCreate']); -$m->click_button (name => 'movedown'); - -$m->form_name ('SelectionBox-body'); -$m->click_button (name => 'movedown'); - -$m->form_name ('SelectionBox-body'); -#$m->click_button (name => 'body-Save'); -$m->get ( $url ); -$m->content_like (qr'highest priority tickets', 'adds them back'); |