[Rt-commit] r8477 - in rt/branches/3.7-EXPERIMENTAL-TUNIS: .

[sartak at bestpractical.com]

Author: sartak
Date: Thu Aug  9 12:10:33 2007
New Revision: 8477

Modified:
   rt/branches/3.7-EXPERIMENTAL-TUNIS/   (props changed)
   rt/branches/3.7-EXPERIMENTAL-TUNIS/t/mail/gnupg-realmail.t

Log:
 r37171 at gorgoroth:  sartak | 2007-08-09 12:03:30 -0400
 rename mail gate function from ruz


Modified: rt/branches/3.7-EXPERIMENTAL-TUNIS/t/mail/gnupg-realmail.t
==============================================================================
--- rt/branches/3.7-EXPERIMENTAL-TUNIS/t/mail/gnupg-realmail.t	(original)
+++ rt/branches/3.7-EXPERIMENTAL-TUNIS/t/mail/gnupg-realmail.t	Thu Aug  9 12:10:33 2007
@@ -8,8 +8,6 @@
 use String::ShellQuote 'shell_quote';
 use IPC::Run3 'run3';
 
-require "lib/t/utils.pl";
-
 my $homedir = File::Spec->catdir( getcwd(), qw(lib t data crypt-gnupg) );
 
 RT->Config->Set( LogToScreen => 'debug' );
@@ -46,6 +44,7 @@
 
     open my $mailhandle, '<', $file
         or do { diag "Unable to read $file: $!"; return };
+
     my $mail = do { local $/; <$mailhandle> };
     close $mailhandle;
 
@@ -58,7 +57,7 @@
     my $mail = get_contents($eid)
         or return 0;
 
-    my ($status, $id) = create_ticket_via_gate($mail);
+    my ($status, $id) = RT::Test->send_via_mailgate($mail);
     is ($status >> 8, 0, "The mail gateway exited normally");
 
     my $tick = get_latest_ticket_ok();