commands: Always put ship or land unit before retreating it

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

diff --git a/src/lib/commands/torp.c b/src/lib/commands/torp.c
index d945d180860f60d8c68352e2275d7123a7a241c0..79ca3eb47d6a9aec94741c1134d4e0851abd14d3 100644 (file)
--- a/src/lib/commands/torp.c
+++ b/src/lib/commands/torp.c
@@ -188,9 +188,9 @@ torp(void)
            shipdamage(&vship, dam);
            if (vship.shp_effic < SHIP_MINEFF)
                pr("%s sunk!\n", prsub(&vship));
+           putship(vship.shp_uid, &vship);
            if (vship.shp_rflags & RET_TORPED)
                retreat_ship(&vship, vshipown, 't');
-           putship(vship.shp_uid, &vship);
        } else {
            pr("Missed\n");
            if (vshipown != 0)