X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FResultSource%2FView.pm;h=27794927b6ccb016a354ceacc20f33d653359b5d;hb=943538a0c95dadb185600979901b76c404445b72;hp=d992c71b14d617c724bbe7fd53b761566a45ad54;hpb=496846a46dcfae058a2fa48224316978171434ae;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/DBIx/Class/ResultSource/View.pm b/lib/DBIx/Class/ResultSource/View.pm index d992c71..2779492 100644 --- a/lib/DBIx/Class/ResultSource/View.pm +++ b/lib/DBIx/Class/ResultSource/View.pm @@ -8,9 +8,15 @@ use DBIx::Class::ResultSet; use base qw/DBIx::Class/; __PACKAGE__->load_components(qw/ResultSource/); __PACKAGE__->mk_group_accessors( - 'simple' => qw(is_virtual view_definition) + 'simple' => qw(is_virtual view_definition depends_on) ); +sub new { + my $new = shift->next::method(@_); + $new->{depends_on} = { %{$new->{depends_on}||{}} }; + return $new; +} + =head1 NAME DBIx::Class::ResultSource::View - ResultSource object representing a view