- my ($self, $config, $namespace, $classes) = @_;
- $config->{classes} = $classes;
- $config->{table_to_class} = { map { $_->table => $_ } @$classes };
- $config->{tables} = [ keys %{$config->{table_to_class}} ];
+ my ( $self, $config, $namespace, $classes ) = @_;
+ $config->{classes} = $classes;
+ foreach my $class (@$classes) { $namespace->load_model_subclass($class); }
+ $namespace->model_classes_loaded(1);
+ $config->{table_to_class} = { map { $_->table => $_ } @$classes };
+ $config->{tables} = [ keys %{ $config->{table_to_class} } ];