From 472254020c99d42724181f2adc2d9250e8537d1c Mon Sep 17 00:00:00 2001
From: Christian Schlittchen <corwin@amber.kn-bremen.de>
Date: Mon, 18 Feb 2002 17:57:27 +0000
Subject: [PATCH] - Fix expandrecruit

---
 src/common/gamecode/economy.c | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/src/common/gamecode/economy.c b/src/common/gamecode/economy.c
index 403b72d6d..ad1126030 100644
--- a/src/common/gamecode/economy.c
+++ b/src/common/gamecode/economy.c
@@ -312,8 +312,14 @@ expandrecruit(region * r, request * recruitorders)
 	for (u = r->units; u; u = u->next) {
 		if (u->n >= 0) {
 			unit * unew;
-			if (u->number==0) unew = u;
-			else unew = createunit(r, u->faction, u->n, u->race);
+			if (u->number==0) {
+				set_number(u, u->n);
+				u->hp = u->n * unit_max_hp(u);
+				unew = u;
+			} else {
+				unew = createunit(r, u->faction, u->n, u->race);
+			}
+
 			if (unew->race == new_race[RC_URUK]) {
 				change_level(unew, SK_SWORD, 1);
 				change_level(unew, SK_SPEAR, 1);