[Rt-commit] r8998 - rt/branches/3.7-EXPERIMENTAL/t/web

[ruz at bestpractical.com]

Author: ruz
Date: Tue Sep 11 18:51:50 2007
New Revision: 8998

Modified:
   rt/branches/3.7-EXPERIMENTAL/t/web/gnupg-outgoing.t

Log:
* fix tests

Modified: rt/branches/3.7-EXPERIMENTAL/t/web/gnupg-outgoing.t
==============================================================================
--- rt/branches/3.7-EXPERIMENTAL/t/web/gnupg-outgoing.t	(original)
+++ rt/branches/3.7-EXPERIMENTAL/t/web/gnupg-outgoing.t	Tue Sep 11 18:51:50 2007
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-use Test::More tests => 428;
+use Test::More tests => 476;
 use RT::Test;
 use RT::Action::SendEmail;
 use File::Temp qw(tempdir);
@@ -292,8 +292,10 @@
         }
     }
 
-    $m->submit;
+    $m->click('SubmitTicket');
     is $m->status, 200, "request successful";
+    $m->content_like(qr/Message recorded/, 'Message recorded') or diag $m->content;
+
     $m->get_ok('/'); # ensure that the mail has been processed
 
     my @mail = RT::Test->fetch_caught_mails;