(do_conv, enli, explore, move, shoo, s_commod): sct_mobil was changed

[empserver] / src / lib / commands / enli.c

diff --git a/src/lib/commands/enli.c b/src/lib/commands/enli.c
index 34ce7cd03171683ca5262752376bfa938f3dc848..df89f2899b22642b80abe578468af698a32e829e 100644 (file)
--- a/src/lib/commands/enli.c
+++ b/src/lib/commands/enli.c
@@ -117,10 +117,8 @@ enli(void)
        sect.sct_item[I_CIVIL] = civ - newmil;
        pr("%3d enlisted in %s (%d)\n", newmil,
           xyas(sect.sct_x, sect.sct_y, player->cnum), mil + newmil);
-       if (sect.sct_mobil > 0) {
-           sect.sct_mobil = (u_char)((float)sect.sct_mobil *
-                                     (1.0 - (float)newmil / (float)civ));
-       }
+       if (sect.sct_mobil > 0)
+           sect.sct_mobil *= 1.0 - (double)newmil / (double)civ;
        putsect(&sect);
        if (totalmil >= 10000) {
            pr("Rioting in induction center interrupts enlistment\n");