X-Git-Url: https://git.8kb.co.uk/?p=playtime%2Fmortgage_calculator;a=blobdiff_plain;f=mcalc.pl;fp=mcalc.pl;h=57812dd119e290038cf7f336abc7ea46595dbb7f;hp=6bb75784f8da4487b9406a94e1e7817622642670;hb=8ca35d3459ed23b6e6910425dc75787bd86cc447;hpb=8e87c0bdc92f1d92c0f9d28e879daa9e39ebdbcf

diff --git a/mcalc.pl b/mcalc.pl
index 6bb7578..57812dd 100755
--- a/mcalc.pl
+++ b/mcalc.pl
@@ -95,7 +95,7 @@ do_it: {
 
 		for ($month = 1; $month <= 12; $month++) {		
 			$month_value = $month_value+($month_value*$monthly_interest)-($monthly_payment+$monthly_overpayment);
-			$total_paid = $total_paid + $monthly_payment;
+			$total_paid = $total_paid + $monthly_payment + $monthly_overpayment;
 			$interest_accrued = $interest_accrued + ($month_value*$monthly_interest);
 			if (($month == 12) || ($month_value <= 0)){
 				print "End of year ", pack("A5",$year);