--- deliantra/server/ext/map-tags.ext	2007/11/14 08:09:46	1.10
+++ deliantra/server/ext/map-tags.ext	2007/12/02 15:16:28	1.12
@@ -174,14 +174,14 @@
    warn sprintf "map-tag scan (%fs)", EV::time - $start;
 }
 
-our $RELOAD_SCHEDULER = cf::periodic $SCHEDULE_INTERVAL, sub {
-   cfd::async {
-      $Coro::current->prio (Coro::PRIO_MIN);
-      $Coro::current->desc ("map-tag scanner");
-      reload;
-   };
+our $RELOAD_SCHEDULER = cf::periodic $SCHEDULE_INTERVAL, Coro::unblock_sub {
+   $Coro::current->prio (Coro::PRIO_MIN);
+   $Coro::current->desc ("map-tag scanner");
+   reload;
 };
 
+cf::async { reload }; # force at startup
+
 # find all objects with the given tag, or at least try to
 sub find($) {
    my ($tag) = @_;