view release on metacpan or  search on metacpan

lib/Catalyst/Plugin/Data/Pensieve.pm  view on Meta::CPAN

    __PACKAGE__->config(
        'Plugin::Data::Pensieve' => {
            revision_model      => 'DB::Revision',
            revision_data_model => 'DB::RevisionData',
            definitions         => {
                foo => [ qw/ foo_id name bar baz / ],
            },
        },
    );
    
    sub update_data :Local :Args(3) {
        my ($self, $c, $pk, $key, $value) = @_;
        
        $c->pensieve->store_revisions(
            some_kinda_data => $pk, {
                $key => $value
            }
        );
    }

=cut