--- deliantra/server/ext/map-random.ext	2007/01/14 02:00:36	1.6
+++ deliantra/server/ext/map-random.ext	2007/01/21 21:28:27	1.9
@@ -10,6 +10,9 @@
    if (0 < Coro::AIO::aio_load "$cf::RANDOM_MAPS/$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 {
+      warn "unable to read meta file for $self->{random_id}\n";
+      return 0;
    }
 
    1
@@ -40,7 +43,7 @@
    undef
 }
 
-sub load_orig {
+sub load_header_orig {
    my ($self) = @_;
 
    return unless $self->{random};
@@ -84,10 +87,11 @@
 
 # clean up old temp maps regularly
 Event->timer (
-   data     => cf::WF_AUTOCANCEL,
-   interval => 3600,
-   after    => 600,
-   cb       => \&clean_random_maps,
+   reentrant => 0,
+   data      => cf::WF_AUTOCANCEL,
+   interval  => 3600,
+   after     => 60,
+   cb        => \&clean_random_maps,
 );
 
 1