From a5a811f7677ad474d4630d074172872814ae935e Mon Sep 17 00:00:00 2001
From: truelight <truelight@openttd.org>
Date: Tue, 28 Dec 2004 09:29:40 +0000
Subject: [PATCH] (svn r1285) -Fix: your loan is now substracted from your
 company value

---
 economy.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/economy.c b/economy.c
index 87bfcb5513..d5f1661c38 100644
--- a/economy.c
+++ b/economy.c
@@ -105,8 +105,8 @@ int64 CalculateCompanyValue(Player *p) {
 		}
 	}
 
-	if (p->player_money > 0)
-		value += p->money64; // add real money value
+	if (p->player_money > p->current_loan)
+		value += p->money64 - p->current_loan; // add real money value
 
 	return value;
 }