X-Git-Url: http://git.pond.sub.org/?p=empserver;a=blobdiff_plain;f=src%2Flib%2Fcommands%2Fprod.c;h=882ff28cb79c84b96b7afe78241dc61761e16462;hp=c0f0688df327894bd61e934c5322c68155e37f09;hb=ac60160355f1b1fb7842cb806e5bb154dd233bfb;hpb=2a1e03983498bd8da7d89b4c8f3cb695ebf96fff

diff --git a/src/lib/commands/prod.c b/src/lib/commands/prod.c
index c0f0688df..882ff28cb 100644
--- a/src/lib/commands/prod.c
+++ b/src/lib/commands/prod.c
@@ -135,7 +135,6 @@ prod(void)
 		eff = 0;
 	    }
 	    if (!eff && IS_BIG_CITY(otype) && !IS_BIG_CITY(type)) {
-		natp = getnatp(sect.sct_own);
 		maxpop = max_population(natp->nat_level[NAT_RLEV],
 					type, eff);
 		work = new_work(&sect,
@@ -184,12 +183,8 @@ prod(void)
 
 	    if (sect.sct_own != sect.sct_oldown)
 		continue;
-	    civs = (1.0 + obrate * etu_per_update) * sect.sct_item[I_CIVIL];
-	    natp = getnatp(sect.sct_own);
-	    maxpop = max_pop(natp->nat_level[NAT_RLEV], &sect);
-	    civs = MIN(civs, maxpop);
 	    enlisted = 0;
-	    maxmil = (civs / 2) - sect.sct_item[I_MILIT];
+	    maxmil = MIN(civs, maxpop) / 2 - sect.sct_item[I_MILIT];
 	    if (maxmil > 0) {
 		enlisted = (etu_per_update
 			    * (10 + sect.sct_item[I_MILIT])
@@ -214,7 +209,6 @@ prod(void)
 	    resource = (unsigned char *)&sect + pp->p_nrndx;
 	else
 	    resource = NULL;
-	natp = getnatp(sect.sct_own);
 	/*
 	 * sect p_e  (inc improvements)
 	 */