[perl #38057] [PATCH] fixes a little typo from chromatic some time ago

[via RT]

# New Ticket Created by  Alberto Simoes 
# Please include the string:  [perl #38057]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/rt3/Ticket/Display.html?id=38057 >



-- 
Alberto Simões - Departamento de Informática - Universidade do Minho
                  Campus de Gualtar - 4710-057 Braga - Portugal

Index: t/harness
===================================================================
--- t/harness   (revision 10724)
+++ t/harness   (working copy)
@@ -184,8 +184,8 @@
         printf STDERR "%s OK from %s tests (%.2f%% ok)\n\n",
             $stats{ok},
             $stats{tests},
-            $stats{ok} / $stats{tests} * 100,
-            $self->{meat}{end_time} = time;
+            $stats{ok} / $stats{tests} * 100;
+       $self->{meat}{end_time} = time;
       };
 
       my $start = time();