4 use RT::Test tests => 24;
5 my ( $baseurl, $m ) = RT::Test->started_ok;
7 my $cf = RT::CustomField->new($RT::SystemUser);
12 LookupType => 'RT::Queue-RT::Ticket',
15 ok( $cf->AddToObject( RT::Queue->new($RT::SystemUser) ) );
17 RT::Test->create_tickets(
18 { Queue => 'General' },
19 { Subject => 'ticket foo', 'CustomField-' . $cf->id => '2011-09-15' },
20 { Subject => 'ticket bar', 'CustomField-' . $cf->id => '2011-10-15' },
21 { Subject => 'ticket baz' },
24 ok( $m->login, 'logged in' );
26 $m->get_ok('/Search/Build.html');
27 $m->form_name( 'BuildQuery' );
30 $m->find_all_inputs( type => 'option', name_regex => qr/I'm a cf/ );
32 $m->find_all_inputs( type => 'text', name_regex => qr/I'm a cf/ );
34 diag "search directly";
36 fields => { $cf_op->name => '<', $cf_field->name => '2011-09-30', },
40 $m->title_is( 'Found 1 ticket', 'found only 1 ticket' );
41 $m->content_contains( 'ticket foo', 'has ticket foo' );
43 diag "first add clause, then search";
44 $m->get_ok('/Search/Build.html?NewQuery=1');
45 $m->form_name( 'BuildQuery' );
47 fields => { $cf_op->name => '<', $cf_field->name => '2011-09-30', },
48 button => 'AddClause',
50 $m->follow_link_ok( { text => 'Show Results' } );
51 $m->title_is( 'Found 1 ticket', 'found only 1 ticket' );
52 $m->content_contains( 'ticket foo', 'has ticket foo' );