From a5f8742b3fee60352787e831fb0d9525731efc63 Mon Sep 17 00:00:00 2001
From: Ron Koenderink <rkoenderink@yahoo.ca>
Date: Thu, 4 Jan 2007 13:22:06 +0000
Subject: [PATCH] (landrepair): Allow land unit repairs in allied sectors

---
 src/lib/update/land.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/lib/update/land.c b/src/lib/update/land.c
index 7bb8a64c..45589598 100644
--- a/src/lib/update/land.c
+++ b/src/lib/update/land.c
@@ -240,7 +240,8 @@ landrepair(struct lndstr *land, struct natstr *np, int *bp, int etus)
 	/* land is ok; no repairs needed */
 	return;
     }
-    if (sp->sct_own != land->lnd_own)
+    if ((sp->sct_own != land->lnd_own) &&
+	(getrel(getnatp(sp->sct_own), land->lnd_own) != ALLIED))
 	return;
 
     if (!player->simulation)