Revision history for DBIx::Class
+ - rename _parent_rs to _parent_source in ResultSet
+
0.06999_05 2006-07-04 14:40:01
- fix issue with incorrect $rs->{attrs}{alias}
- fix subclassing issue with source_name
}
my $rs = (ref $self)->new($self->result_source, $new_attrs);
- $rs->{_parent_rs} = $self->{_parent_rs} if $self->{_parent_rs};
+ $rs->{_parent_source} = $self->{_parent_source} if $self->{_parent_source};
unless (@_) { # no search, effectively just a clone
my $rows = $self->get_cache;
return $self->{_attrs} if $self->{_attrs};
my $attrs = $self->{attrs};
- my $source = $self->{_parent_rs} || $self->{result_source};
+ my $source = $self->{_parent_source} || $self->{result_source};
my $alias = $attrs->{_orig_alias};
# XXX - lose storable dclone
# offset, order by and page are not needed to count. record_filter is cdbi
delete $attrs->{$_} for qw/rows offset order_by page pager record_filter/;
my $tmp_rs = (ref $self)->new($self->result_source, $attrs);
- $tmp_rs->{_parent_rs} = $self->{_parent_rs} if $self->{_parent_rs};
+ $tmp_rs->{_parent_source} = $self->{_parent_source} if $self->{_parent_source};
#XXX - hack to pass through parent of related resultsets
my ($count) = $tmp_rs->cursor->next;
);
# keep reference of the original resultset
- $rs->{_parent_rs} = $self->{_parent_rs} || $self->result_source;
+ $rs->{_parent_source} = $self->{_parent_source} || $self->result_source;
return $rs;
};