--- deliantra/server/lib/cf.pm	2007/12/17 08:27:44	1.406
+++ deliantra/server/lib/cf.pm	2008/01/14 10:12:12	1.408
@@ -29,7 +29,7 @@
 use Data::Dumper;
 use Digest::MD5;
 use Fcntl;
-use YAML::Syck ();
+use YAML ();
 use IO::AIO 2.51 ();
 use Time::HiRes;
 use Compress::LZF;
@@ -41,9 +41,6 @@
 Coro::State::cctx_stacksize 256000; # 1-2MB stack, for deep recursions in maze generator
 Compress::LZF::sfreeze_cr { }; # prime Compress::LZF so it does not use require later
 
-# work around bug in YAML::Syck - bad news for perl6, will it be as broken wrt. unicode?
-$YAML::Syck::ImplicitUnicode = 1;
-
 $Coro::main->prio (Coro::PRIO_MAX); # run main coroutine ("the server") with very high priority
 
 sub WF_AUTOCANCEL () { 1 } # automatically cancel this watcher on reload
@@ -196,6 +193,11 @@
    };
 }
 
+$Coro::State::DIEHOOK = sub {
+   warn Carp::longmess $_[0];
+   Coro::terminate;
+};
+
 @safe::cf::global::ISA         = @cf::global::ISA         = 'cf::attachable';
 @safe::cf::object::ISA         = @cf::object::ISA         = 'cf::attachable';
 @safe::cf::player::ISA         = @cf::player::ISA         = 'cf::attachable';
@@ -3310,7 +3312,7 @@
       or return;
 
    local $/;
-   *CFG = YAML::Syck::Load <$fh>;
+   *CFG = YAML::Load <$fh>;
 
    $EMERGENCY_POSITION = $CFG{emergency_position} || ["/world/world_105_115", 5, 37];