Fix weight of containers in lev_comp

doc/fixes36.1

@@ -99,6 +99,7 @@ zapping wand of opening at yourself, unlock carried boxes
 dissolve iron bars by force-fighting with wielded potion of acid
 poison breath leaves a trail of poison gas
 make vault guard accept names starting with number
+fix weight of containers in special levels
 
 
 Platform- and/or Interface-Specific Fixes

src/sp_lev.c

@@ -1873,11 +1873,12 @@ struct mkroom *croom;
                 }
             }
         } else {
+            struct obj *cobj = container_obj[container_idx - 1];
             remove_object(otmp);
-            if (container_obj[container_idx - 1])
+            if (cobj) {
-                (void) add_to_container(container_obj[container_idx - 1],
+                (void) add_to_container(cobj, otmp);
-                                        otmp);
+                cobj->owt = weight(cobj);
-            else {
+            } else {
                 obj_extract_self(otmp);
                 obfree(otmp, NULL);
                 return;