* Oleg Pronin <[EMAIL PROTECTED]> [070511 18:30]:
> 1. Reloading
>
> I thought it would be great if DBIx::Class had this feature:
>
> sub reload {
> my ($self, $attrs) = @_;
>
> my $fresh_me = $self->result_source->resultset->find({
> map { $_ => $self->get_column($_) } $self->primary_columns,
> }, $attrs);
> $self->set_columns({$fresh_me->get_columns});
> 1;
> }
$obj->discard_changes;
http://search.cpan.org/~blblack/DBIx-Class-0.07006/lib/DBIx/Class/PK.pm
-Marc
_______________________________________________
List: http://lists.rawmode.org/cgi-bin/mailman/listinfo/dbix-class
Wiki: http://dbix-class.shadowcatsystems.co.uk/
IRC: irc.perl.org#dbix-class
SVN: http://dev.catalyst.perl.org/repos/bast/trunk/DBIx-Class/
Searchable Archive: http://www.mail-archive.com/[email protected]/
