--- deliantra/server/server/cfperl.xs	2007/04/28 05:55:55	1.199
+++ deliantra/server/server/cfperl.xs	2007/04/28 17:51:58	1.200
@@ -2001,6 +2001,12 @@
                         object *ob = get_archetype (SvPVutf8_nolen (*elem));
                         ob->flag [FLAG_NO_MAP_SAVE] = true;
                         THIS->insert (ob, x, y, 0, INS_ABOVE_FLOOR_ONLY);
+
+                        if (ob->randomitems)
+                          {
+                            ob->create_treasure (ob->randomitems);
+                            ob->randomitems = 0;
+                          }
                       }
                   }
               }