Permit ships that can drop depth charges, but not fire

No such ships exist in the stock game.

diff --git a/src/lib/commands/mfir.c b/src/lib/commands/mfir.c
index b6c7da2f2814f57a81a6036bff83216b9853d8ac..bd7f6d22bb44c1ee48645668a4213d4eab1119fa 100644 (file)
--- a/src/lib/commands/mfir.c
+++ b/src/lib/commands/mfir.c
@@ -160,7 +160,8 @@ multifire(void)
                pr("Not enough mil on ship #%d\n", item.ship.shp_uid);
                continue;
            }
-           if (mchr[item.ship.shp_type].m_glim == 0) {
+           if (mchr[item.ship.shp_type].m_glim == 0
+               && !(mchr[fship.shp_type].m_flags & M_DCH)) {
                pr("Ships %d cannot fire guns!\n", item.ship.shp_uid);
                continue;
            }