diff options
author | ivan <ivan> | 2010-05-18 18:49:59 +0000 |
---|---|---|
committer | ivan <ivan> | 2010-05-18 18:49:59 +0000 |
commit | e70abd21bab68b23488f7ef1ee2e693a3b365691 (patch) | |
tree | 75986ffa9ba6ab4f961f9033468a1344e1653408 /rt/t/web/cf_access.t | |
parent | b4b0c7e72d7eaee2fbfc7022022c9698323203dd (diff) |
import rt 3.8.8
Diffstat (limited to 'rt/t/web/cf_access.t')
-rw-r--r-- | rt/t/web/cf_access.t | 12 |
1 files changed, 5 insertions, 7 deletions
diff --git a/rt/t/web/cf_access.t b/rt/t/web/cf_access.t index 1022c6da6..183597b4a 100644 --- a/rt/t/web/cf_access.t +++ b/rt/t/web/cf_access.t @@ -43,16 +43,14 @@ my ( $cf, $cfid, $tid ); $m->form_name('EditCustomFields'); # Sort by numeric IDs in names - my @names = map { $_->[1] } - sort { $a->[0] <=> $b->[0] } - map { /Object-1-CF-(\d+)/ ? [ $1 => $_ ] : () } - grep defined, map $_->name, $m->current_form->inputs; + my @names = sort grep defined, + $m->current_form->find_input('AddCustomField')->possible_values; $cf = pop(@names); $cf =~ /(\d+)$/ or die "Hey this is impossible dude"; $cfid = $1; - $m->field( $cf => 1 ); # Associate the new CF with this queue - $m->field( $_ => undef ) for @names; # ...and not any other. ;-) - $m->submit; + $m->tick( AddCustomField => $cf => 1 ); # Associate the new CF with this queue + $m->tick( AddCustomField => $_ => 0 ) for @names; # ...and not any other. ;-) + $m->click('UpdateCFs'); $m->content_like( qr/Object created/, 'TCF added to the queue' ); } |