15% of events. My stupid code didn't account of 0array being 1 less the actual count.

diff --git a/t/core_events.t b/t/core_events.t
index 5648691..c4526ee 100644 (file)
--- a/t/core_events.t
+++ b/t/core_events.t
@@ -50,7 +50,7 @@ StopTextInput
 SetTextInputRect 
 /;
 
-my $why = '[Percentage Completion] '.int( 100 * $#done / ($#done + $#left) ) ."\% implementation. $#done / ".($#done+$#left); 
+my $why = '[Percentage Completion] '.int( 100 * ($#done +1 ) / ($#done + $#left + 2  ) ) .'% implementation. '.($#done +1 ).'/'.($#done+$#left + 2 ); 
 
 TODO:
 {