Hi,
I'm trying to combine Candy with the functionality of
DBIx::Class::DynamicSubclass and it seems the Candy's export/import
"magic" get in the way of DynamicSubclass, so something like that:
use utf8;
package App::Schema::Result::User;
use Moose;
use MooseX::NonMoose;
use MooseX::MarkAsMethods autoclean => 1;
use DBIx::Class::Candy -autotable => v1,
-components => ['InflateColumn::DateTime',
'TimeStamp',
'InflateColumn::ClassTypeEnum',
'DynamicSubclass',
];
=head1 COMPONENTS LOADED
=over 4
=item * L<DBIx::Class::InflateColumn::DateTime>
=item * L<DBIx::Class::TimeStamp>
=item * L<DBIx::Class::InflateColumn::ClassTypeEnum>
=back
=head1 TYPECAST MAP
=head2 Map of users type for single-table inheritance
Doctor => App::Schema::Result::Doctor
Assistant => App::Schema::Result::Assistant
=cut
__PACKAGE__->typecast_map(type => {
'Doctor' => 'App::Schema::Result::Doctor',
'Assistant' => 'App::Schema::Result::Assistant',
});
Dies with:
Couldn't instantiate component "App::Model::DB", "{UNKNOWN}: Can't locate object method
"result_source_instance" via package "App::Schema::Result::User" at (eval 634) line 18.
Compilation failed in require at
/home/marco/.perlbrew/libs/perl-5.22.1/lib/perl5/Class/C3/Componentised.pm line
150. at
/home/marco/.perlbrew/libs/perl-5.22.1/lib/perl5/Class/C3/Componentised.pm line
155
Compilation failed in require at
/home/marco/.perlbrew/libs/perl-5.22.1/lib/perl5/Catalyst/Test.pm line 155.
BEGIN failed--compilation aborted at t/01app.t line 6.
t/01app.t .............. Dubious, test returned 255 (wstat 65280, 0xff00)
No subtests run
because this line:
my $real_columns = $this->result_source_instance->_columns;
(https://metacpan.org/source/SYBER/DBIx-Class-DynamicSubclass-0.03/lib/DBIx/Class/DynamicSubclass.pm#L159)
expects to find a "result_source_instance" method which candy seems to
have cleaned up.
Do I have any alternatives to get that method at run-time with Candy, or
should I give up and don't use the Candy module?
Thank you.
Marco
_______________________________________________
List: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/dbix-class
IRC: irc.perl.org#dbix-class
SVN: http://dev.catalyst.perl.org/repos/bast/DBIx-Class/
Searchable Archive: http://www.grokbase.com/group/dbix-class@lists.scsys.co.uk