--- deliantra/server/ext/map-tags.ext	2007/09/13 12:36:25	1.6
+++ deliantra/server/ext/map-tags.ext	2007/09/19 22:07:16	1.9
@@ -79,9 +79,10 @@
 
    # we don't actually care if it succeeds or not, as we
    # will just retry an hour later
-   BDB::db_txn_commit $txn;
+   BDB::db_txn_finish $txn;
 
-#   warn "tag-updated $file (= $key) $hash\n";#d#
+   warn "tag-updated $file (= $key) <@tags>\n"
+      if @tags;
 }
 
 sub scan_static {
@@ -103,6 +104,8 @@
 }
 
 sub reload {
+   my $guard = cf::lock_acquire "map-tags::reload";
+
    my $start = Event::time;
 
    # 1. check for maps no longer existing
@@ -128,7 +131,7 @@
          for my $tag (@{ $tags || [] }) {
             remove_tag_target $txn, $tag, $key;
          }
-         BDB::db_txn_commit $txn;
+         BDB::db_txn_finish $txn;
       }
    }
 
@@ -177,6 +180,7 @@
    data     => cf::WF_AUTOCANCEL,
    cb       => Coro::unblock_sub {
       $Coro::current->prio (Coro::PRIO_MIN);
+      $Coro::current->desc ("map-tag scanner");
       reload;
    },
 );