--- deliantra/server/lib/cf.pm 2006/08/09 10:57:28 1.29 +++ deliantra/server/lib/cf.pm 2006/08/12 11:51:37 1.30 @@ -72,7 +72,7 @@ # we bless all objects into derived classes to force a method lookup # within the Safe compartment. -for my $pkg (qw(cf::object cf::object::map cf::object::player cf::player cf::map cf::party cf::region)) { +for my $pkg (qw(cf::object cf::object::map cf::object::player cf::player cf::map cf::party cf::region cf::arch)) { no strict 'refs'; @{"ext::$pkg\::wrap::ISA"} = @{"$pkg\::wrap::ISA"} = $pkg; }