[Rt-commit] r4626 - in rt/branches/3.7-EXPERIMENTAL: . lib/t/regression

[jesse at bestpractical.com]

Author: jesse
Date: Wed Mar  1 16:30:26 2006
New Revision: 4626

Modified:
   rt/branches/3.7-EXPERIMENTAL/   (props changed)
   rt/branches/3.7-EXPERIMENTAL/lib/RT/Tickets_Overlay_SQL.pm
   rt/branches/3.7-EXPERIMENTAL/lib/t/regression/04send_email.t

Log:
 r24845 at truegrounds:  jesse | 2006-03-01 16:30:12 -0500
 * Fixes for test spewage


Modified: rt/branches/3.7-EXPERIMENTAL/lib/RT/Tickets_Overlay_SQL.pm
==============================================================================
--- rt/branches/3.7-EXPERIMENTAL/lib/RT/Tickets_Overlay_SQL.pm	(original)
+++ rt/branches/3.7-EXPERIMENTAL/lib/RT/Tickets_Overlay_SQL.pm	Wed Mar  1 16:30:26 2006
@@ -198,11 +198,6 @@
         }
         my $sub = $dispatch{ $class };
 
-        unless( $dispatch{ $class } ) {
-            die "No dispatch method for class '$class'"
-        }
-        my $sub = $dispatch{ $class };
-
         if ( $can_bundle{ $class }
              && ( !@bundle
                   || ( $bundle[-1]->{dispatch}  == $sub

Modified: rt/branches/3.7-EXPERIMENTAL/lib/t/regression/04send_email.t
==============================================================================
--- rt/branches/3.7-EXPERIMENTAL/lib/t/regression/04send_email.t	(original)
+++ rt/branches/3.7-EXPERIMENTAL/lib/t/regression/04send_email.t	Wed Mar  1 16:30:26 2006
@@ -88,8 +88,8 @@
 use Data::Dumper;
 
 my $ticket = RT::Ticket->new($RT::SystemUser);
-my  ($id,  undef, $msg ) = $ticket->Create(Requestor => ['root at localhost'], Queue => 'general', Subject => 'I18NTest', MIMEObj => $parser->Entity);
-ok ($id,$msg);
+my  ($id,  undef, $create_msg ) = $ticket->Create(Requestor => ['root at localhost'], Queue => 'general', Subject => 'I18NTest', MIMEObj => $parser->Entity);
+ok ($id,$create_msg);
 $tickets = RT::Tickets->new($RT::SystemUser);
 $tickets->OrderBy(FIELD => 'id', ORDER => 'DESC');
 $tickets->Limit(FIELD => 'id' ,OPERATOR => '>', VALUE => '0');