[Bps-public-commit] Test-Chimps-Anna branch, master, updated. 99724c61cb950bc309917a1b24c88d3e4bd2aa6f

jesse jesse at bestpractical.com
Wed Oct 7 14:45:43 EDT 2009


The branch, master has been updated
       via  99724c61cb950bc309917a1b24c88d3e4bd2aa6f (commit)
      from  2d56cc516f6ae21f210c95d5ab5b9a67a228ca56 (commit)

Summary of changes:
 lib/Test/Chimps/Anna.pm |   26 ++++++++++++++------------
 1 files changed, 14 insertions(+), 12 deletions(-)

- Log -----------------------------------------------------------------
commit 99724c61cb950bc309917a1b24c88d3e4bd2aa6f
Author: Jesse Vincent <jesse at bestpractical.com>
Date:   Wed Oct 7 14:45:39 2009 -0400

    typo fixing

diff --git a/lib/Test/Chimps/Anna.pm b/lib/Test/Chimps/Anna.pm
index 190c29c..d905511 100644
--- a/lib/Test/Chimps/Anna.pm
+++ b/lib/Test/Chimps/Anna.pm
@@ -198,7 +198,7 @@ sub tick {
                 if ( $self->{passing_projects}->{ $report->project } % 5 == 0 ) {
                     $self->_say_to_all(
                               $report->project . " rev " 
-                            . $rev,
+                            . $rev
                             . (
                             ? ( '(' . $date. ')' )
                             : ''
@@ -254,17 +254,19 @@ sub _say_to_all {
 }
 
 sub preprocess_report_metadata {
-	my $self = shift;
-	my $report = shift;
-            my $rev = substr( $report->revision, 0, 6 );
-            my $committer = $report->committer;
-            $committer =~ s/^(?:.*)<(.*)>(?:.*)/$1/g;
-            my $date;
-            if ( $report->can('committed_date') ) {
-                $dt   = $self->string_to_datetime( $report->committed_date );
-                $date = $self->age_as_string( time() - $dt->epoch );
-            }
-	return ($rev,$committer,$date);
+    my $self   = shift;
+    my $report = shift;
+    my $rev = substr( $report->revision, 0, 6 );
+    my $committer = $report->committer;
+    $committer =~ s/^(?:.*)<(.*)>(?:.*)/$1/g;
+    my $date;
+    if ( $report->can('committed_date') ) {
+        my $dt   = $self->string_to_datetime( $report->committed_date );
+		if ($dt) {
+			$date = $self->age_as_string( time() - $dt->epoch );
+		}
+    }
+    return ( $rev, $committer, $date );
 }
 
 

-----------------------------------------------------------------------



More information about the Bps-public-commit mailing list