diff --git a/std/corpse.c b/std/corpse.c
index 8e4d8ae..db70f74 100644
--- a/std/corpse.c
+++ b/std/corpse.c
@@ -725,3 +725,19 @@
 	filter_objects( inv, "move", p, M_SILENT | M_NOCHECK );
 	p->move( environment(), M_SILENT | M_NOCHECK );
 }
+
+// Verhindert die Zerstoerung im reset() von Containern, die mit
+// remove_multiple() nach identischen Objekten suchen, um Muell zu
+// reduzieren. Das ist aber nur dann sinnvoll, wenn nach dem Zerstoeren
+// nicht mehr Muell rumliegt als vorher, daher geben wir 0 zurueck, wenn
+// die Leiche mehr als ein Objekt enthaelt. Weiterhin raeumt sich die Leiche
+// im Lauf der Zeit selber auf/weg.
+// Objekte, die 0 zurueckgeben, werden in remove_multiple() uebersprungen.
+public string description_id()
+{
+  if ( sizeof(all_inventory(this_object())) > 1 )
+  {
+    return 0;
+  }
+  return ::description_id();
+}