sartak at bestpractical
Nov 23, 2009, 10:54 PM
Post #1 of 1
(304 views)
Permalink
|
|
rt branch, 3.999-trunk, updated. 784e4c0a54fb8893e2958fcc694ec276aa1ad2b1
|
|
The branch, 3.999-trunk has been updated
via 784e4c0a54fb8893e2958fcc694ec276aa1ad2b1 (commit)
from d8e7cc4a2f30d018a1e3dd5c24c25b81ed6049b9 (commit)
Summary of changes:
t/web/crypt-gnupg.t | 58 ++++++++++++++++++++++++++++++++------------------
1 files changed, 37 insertions(+), 21 deletions(-)
- Log -----------------------------------------------------------------
commit 784e4c0a54fb8893e2958fcc694ec276aa1ad2b1
Author: Shawn M Moore <sartak [at] bestpractical>
Date: Tue Nov 24 01:54:09 2009 -0500
jiftyify crypt-gnupg.t
diff --git a/t/web/crypt-gnupg.t b/t/web/crypt-gnupg.t
index 3f8af4a..6d1db3a 100644
--- a/t/web/crypt-gnupg.t
+++ b/t/web/crypt-gnupg.t
@@ -88,12 +88,16 @@ $m->submit;
RT::Test->clean_caught_mails;
$m->goto_create_ticket( $queue );
-$m->form_name('ticket_create');
+$m->fill_in_action_ok(create_ticket => (
+ subject => 'Encryption test',
+ content => 'Some content',
+));
-$m->field('subject', 'Encryption test');
-$m->field('content', 'Some content');
-ok($m->value('encrypt', 2), "encrypt tick box is checked");
-ok(!$m->value('sign', 2), "sign tick box is unchecked");
+my $encrypt = $m->action_field_input('create_ticket', 'encrypt');
+my $sign = $m->action_field_input('create_ticket', 'sign');
+
+ok($encrypt->value, "encrypt tick box is checked");
+ok(!$sign->value, "sign tick box is unchecked");
$m->submit;
is($m->status, 200, "request successful");
@@ -157,11 +161,15 @@ $m->submit;
RT::Test->clean_caught_mails;
$m->goto_create_ticket( $queue );
-$m->form_name('ticket_create');
-$m->field('subject', 'Signing test');
-$m->field('content', 'Some other content');
-ok(!$m->value('encrypt', 2), "encrypt tick box is unchecked");
-ok($m->value('sign', 2), "sign tick box is checked");
+$m->fill_in_action_ok(create_ticket => (
+ subject => 'Signing test',
+ content => 'Some other content',
+));
+
+$encrypt = $m->action_field_input('create_ticket', 'encrypt');
+$sign = $m->action_field_input('create_ticket', 'sign');
+ok(!$encrypt->value, "encrypt tick box is unchecked");
+ok($sign->value, "sign tick box is checked");
$m->submit;
is($m->status, 200, "request successful");
@@ -230,11 +238,15 @@ RT::Test->clean_caught_mails;
$user->set_email('recipient [at] example');
$m->goto_create_ticket( $queue );
-$m->form_name('ticket_create');
-$m->field('subject', 'Crypt+Sign test');
-$m->field('content', 'Some final? content');
-ok($m->value('encrypt', 2), "encrypt tick box is checked");
-ok($m->value('sign', 2), "sign tick box is checked");
+$m->fill_in_action_ok(create_ticket => (
+ subject => 'Crypt+Sign test',
+ content => 'Some final? content',
+));
+
+$encrypt = $m->action_field_input('create_ticket', 'encrypt');
+$sign = $m->action_field_input('create_ticket', 'sign');
+ok($encrypt->value, "encrypt tick box is checked");
+ok($sign->value, "sign tick box is checked");
$m->submit;
is($m->status, 200, "request successful");
$m->get($baseurl); # ensure that the mail has been processed
@@ -296,12 +308,16 @@ MAIL
RT::Test->fetch_caught_mails;
$m->goto_create_ticket( $queue );
-$m->form_name('ticket_create');
-$m->field('subject', 'Test crypt-off on encrypted queue');
-$m->field('content', 'Thought you had me figured out didya');
-$m->field(encrypt => undef, 2); # turn off encryption
-ok(!$m->value('encrypt', 2), "encrypt tick box is now unchecked");
-ok($m->value('sign', 2), "sign tick box is still checked");
+$m->fill_in_action_ok(create_ticket => (
+ subject => 'Test crypt-off on encrypted queue',
+ content => 'Thought you had me figured out didya',
+ encrypt => undef, # turn off encryption
+));
+
+$encrypt = $m->action_field_input('create_ticket', 'encrypt');
+$sign = $m->action_field_input('create_ticket', 'sign');
+ok(!$encrypt->value, "encrypt tick box is now unchecked");
+ok($sign->value, "sign tick box is still checked");
$m->submit;
is($m->status, 200, "request successful");
-----------------------------------------------------------------------
_______________________________________________
Rt-commit mailing list
Rt-commit [at] lists
http://lists.bestpractical.com/cgi-bin/mailman/listinfo/rt-commit
|
