[tapx-dev] [commit][212] Didn't need to be /that/ ugly.

andy at hexten.net andy at hexten.net
Thu Aug 9 00:47:52 BST 2007


Revision: 212
Author:   andy
Date:     2007-08-09 00:47:52 +0100 (Thu, 09 Aug 2007)

Log Message:
-----------
Didn't need to be /that/ ugly.

Modified Paths:
--------------
    trunk/lib/TAP/Parser/Aggregator.pm

Modified: trunk/lib/TAP/Parser/Aggregator.pm
===================================================================
--- trunk/lib/TAP/Parser/Aggregator.pm	2007-08-08 23:45:10 UTC (rev 211)
+++ trunk/lib/TAP/Parser/Aggregator.pm	2007-08-08 23:47:52 UTC (rev 212)
@@ -121,8 +121,7 @@
     $self->{parser_for}{$description} = $parser;
 
     while ( my ( $summary, $method ) = each %SUMMARY_METHOD_FOR ) {
-        my $count = $parser->$method();
-        if ( $count ) {
+        if ( my $count = $parser->$method() ) {
             $self->{$summary} += $count;
             push @{ $self->{"descriptions_for_$summary"} } => $description;
         }




More information about the tapx-dev mailing list