Changeset 18286 for lang/perl/Mvalve

Timestamp:

08/27/08 13:20:45 (5 years ago)

Author:

33rpm

Message:

call utility method

Files:

• lang/perl/Mvalve/trunk/lib/Mvalve/Reader.pm (modified) (1 diff)

lang/perl/Mvalve/trunk/lib/Mvalve/Reader.pm

@@ -56 +56 @@
     my $destination = $message->header( &Mvalve::Const::DESTINATION_HEADER );
 
-    if (&Mvalve::Const::MVALVE_TRACE && $table eq 'q_timed') {
+    if (&Mvalve::Const::MVALVE_TRACE && $qs->is_timed( $table )) {
         Mvalve::trace( "we should have dispatched at " . 
             scalar( localtime( $message->header( &Mvalve::Const::RETRY_HEADER )  /100_000 ) ) );