--- deliantra/server/lib/cf.pm	2007/05/18 01:01:02	1.266
+++ deliantra/server/lib/cf.pm	2007/05/19 00:08:11	1.267
@@ -629,7 +629,7 @@
       } elsif ($type eq "subtype") {
          defined $object_type or Carp::croak "subtype specified without type";
          my $object_subtype = shift @arg;
-         $registry = $CB_TYPE[$object_type + $object_subtype * NUM_SUBTYPES] ||= [];
+         $registry = $CB_TYPE[$object_type + $object_subtype * NUM_TYPES] ||= [];
 
       } elsif ($type eq "package") {
          my $pkg = shift @arg;
@@ -680,6 +680,7 @@
    } else {
       _attach shift->_attach_registry, @_;
    }
+   _recalc_want;
 };
 
 # all those should be optimised
@@ -692,6 +693,7 @@
    } else {
       Carp::croak "cannot, currently, detach class attachments";
    }
+   _recalc_want;
 };
 
 sub cf::attachable::attached {