(landrepair): Allow land unit repairs in allied sectors

diff --git a/src/lib/update/land.c b/src/lib/update/land.c
index 7bb8a64ca0abdcee83e288b42a5a24d918b67e03..455895984e315e57cf9f6e002b9807d3c13159aa 100644 (file)
--- 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;
     }
        /* 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)
        return;
 
     if (!player->simulation)