diff -rud nethack-3.4.1.orig/src/zap.c nethack-3.4.1/src/zap.c
--- nethack-3.4.1.orig/src/zap.c	2003-02-23 15:43:32.000000000 +0100
+++ nethack-3.4.1/src/zap.c	2003-07-18 14:56:26.000000000 +0200
@@ -1348,6 +1348,9 @@
 		otmp->quan /= 2L;	/* some material has been lost */
 	    }
 	    break;
+        case FOOD_CLASS:
+            if (otmp->otyp == CORPSE)
+                    start_corpse_timeout(otmp);
 	}
 
 	/* update the weight */