[svn:DBD-Pg] r11579 - DBD-Pg/trunk/t

[turnstep]

Author: turnstep
Date: Wed Jul 23 15:53:10 2008
New Revision: 11579

Modified:
   DBD-Pg/trunk/t/99_perlcritic.t

Log:
Lose no longer relevant spacing hack.


Modified: DBD-Pg/trunk/t/99_perlcritic.t
==============================================================================
--- DBD-Pg/trunk/t/99_perlcritic.t      (original)
+++ DBD-Pg/trunk/t/99_perlcritic.t      Wed Jul 23 15:53:10 2008
@@ -108,10 +108,10 @@
                diag "Source: $source\n\n";
        }
        if ($vios) {
-               fail (qq{ Failed Perl::Critic tests for file "$filename": 
$vios});
+               fail (qq{Failed Perl::Critic tests for file "$filename": 
$vios});
        }
        else {
-               pass (qq{ File "$filename" passed all Perl::Critic tests});
+               pass (qq{File "$filename" passed all Perl::Critic tests});
        }
 
 }
@@ -181,12 +181,11 @@
                diag "Policy: $policy\n";
                diag "Source: $source\n\n";
        }
-       my $SPACE = ++$count < 7 ? ' ' : '';
        if ($vios) {
-               fail (qq{${SPACE}Failed Perl::Critic tests for file 
"$filename": $vios});
+               fail (qq{Failed Perl::Critic tests for file "$filename": 
$vios});
        }
        else {
-               pass (qq{${SPACE}File "$filename" passed all Perl::Critic 
tests});
+               pass (qq{File "$filename" passed all Perl::Critic tests});
        }
 }