diff --git a/src/trap.c b/src/trap.c
index 6f46d6942..00ff3e17e 100644
--- a/src/trap.c
+++ b/src/trap.c
@@ -1533,6 +1533,8 @@ trapeffect_fire_trap(
             You("smell smoke.");
         if (is_ice(tx, ty))
             melt_ice(tx, ty, (char *) 0);
+        if (DEADMONSTER(mtmp))
+            trapkilled = TRUE;
         if (see_it && t_at(tx, ty))
             seetrap(t_at(tx, ty));