--- deliantra/server/ext/map-random.ext	2007/01/27 12:45:04	1.12
+++ deliantra/server/ext/map-random.ext	2007/04/20 17:56:31	1.14
@@ -7,7 +7,7 @@
 
    $self->{random_id} = $1;
 
-   if (0 < Coro::AIO::aio_load "$cf::RANDOM_MAPS/$self->{random_id}.meta", my $data) {
+   if (0 < Coro::AIO::aio_load "$cf::RANDOMDIR/$self->{random_id}.meta", my $data) {
       $self->{random} = cf::from_json $data;
       $self->{random}{custom} ||= "$self->{random}{origin_map}+$self->{random}{origin_x}+$self->{random}{origin_y}";
    } else {
@@ -36,7 +36,7 @@
 sub save_path {
    my ($self) = @_;
 
-   sprintf "%s/%s.map", $cf::RANDOM_MAPS, $self->{random_id}
+   sprintf "%s/%s.map", $cf::RANDOMDIR, $self->{random_id}
 }
 
 sub uniq_path {
@@ -54,7 +54,7 @@
 }
 
 sub clean_random_maps {
-   my $files = Coro::AIO::aio_readdir $cf::RANDOM_MAPS
+   my $files = Coro::AIO::aio_readdir $cf::RANDOMDIR
       or return;
 
    my $META_TIMEOUT = $cf::CFG{map_random_meta_timeout} || 86400 * 7;
@@ -63,7 +63,7 @@
    for my $file (@$files) {
       next if $file =~ /\.pst$/;
 
-      Coro::AIO::aio_stat "$cf::RANDOM_MAPS/$file"
+      Coro::AIO::aio_stat "$cf::RANDOMDIR/$file"
          and next;
 
       my $age = $cf::NOW - (stat _)[8];
@@ -71,13 +71,13 @@
       if ($file =~ /\.meta$/) {
          if ($age > $META_TIMEOUT) {
             warn "resetting random meta data for $file";
-            IO::AIO::aio_unlink "$cf::RANDOM_MAPS/$file";
+            IO::AIO::aio_unlink "$cf::RANDOMDIR/$file";
          }
       } else {
          if ($age > $MAP_TIMEOUT) {
             warn "resetting random map $file";
-            IO::AIO::aioreq_pri 4; IO::AIO::aio_unlink "$cf::RANDOM_MAPS/$file";
-            IO::AIO::aioreq_pri 4; IO::AIO::aio_unlink "$cf::RANDOM_MAPS/$file.pst";
+            IO::AIO::aioreq_pri 4; IO::AIO::aio_unlink "$cf::RANDOMDIR/$file";
+            IO::AIO::aioreq_pri 4; IO::AIO::aio_unlink "$cf::RANDOMDIR/$file.pst";
          }
       }
    }
@@ -93,7 +93,7 @@
 );
 
 # map generator stresstest, never enable under normal circumstances
-if (1) {
+if (0) {
    cf::async {
       my $seed = 0;
       while () {