--- deliantra/server/ext/map-random.ext	2008/05/06 16:39:28	1.28
+++ deliantra/server/ext/map-random.ext	2008/09/22 05:42:41	1.32
@@ -57,6 +57,7 @@
 }
 
 sub clean_random_maps {
+   return;#d#
    my $files = Coro::AIO::aio_readdir $cf::RANDOMDIR
       or return;
 
@@ -146,7 +147,7 @@
 };
 
 # map generator stresstest, NEVER enable under normal circumstances
-if (0) {
+if ($ENV{STRESSTEST}) {
    cf::async {
       my $seed = 0;
       while () {
@@ -154,10 +155,10 @@
          $map->generate_random_map ({
             region => "scorn",
             random_seed => $seed++,
-            xsize => (int rand 90) + 3,
-            ysize => (int rand 90) + 3,
+            xsize => (int rand 100) + 1,
+            ysize => (int rand 100) + 1,
          });
-#         warn sprintf "%d: %d %d\n", $seed, $map->width, $map->height;#d#
+         warn sprintf "%d: %dx%d o# %d\n", $seed, $map->width, $map->height, &cf::object::objects_size;#d#
          $map->destroy;
       }
    };