view release on metacpan or  search on metacpan

lib/DBIx/Class/FrozenColumns.pm  view on Meta::CPAN

353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
        return @columns;
    }
 
    return 1 if $self->next::method(@_) or keys %{$self->_dirty_frozen_columns||{}};
}
 
=head2 update
 
=cut
 
sub update {
    my $self = shift;
    $self->_dirty_frozen_columns(undef);
    $self->next::method(@_);
}
 
 
=head2 insert
 
=cut