NAME

Catalyst::Controller::CRUD::CDBI - Implementation for Catalyst::Controller::CRUD

SYNOPSIS

MyApp/lib/MyApp.pm

package MyApp;

use Catalyst qw/-Debug I18N CRUD Static::Simple/;

1;

MyApp/lib/MyApp/Controller/User.pm

package MyApp::Controller::User;

use base 'Catalyst::Controller';
use Class::Trigger;

sub setting {
    my ( $self, $c ) = @_;
    my $hash = {
        'name'     => 'user',
        'type'     => 'CDBI',
        'model'    => 'CDBI::UserMaster',
        'primary'  => 'id',
        'columns'  => [qw(name phone mail)],
        'default'  => '/user/list',
        'template' => {
            'prefix' => 'template/user/',
            'suffix' => '.tt'
        },
    };
    return $hash;
}

sub create : Local {
  my ( $self, $c ) = @_;
  $c->create($self);
}

1;

DESCRIPTION

This module implements Class::DBI depend interfaces for Catalyst::Controller::CRUD.

- get_model
- get_models

EXPORT

None by default.

METHODS

get_model($this,$c,$self,$id)

This method returns model object having $id.

get_models($this,$c,$self)

This method returns model objects.

Triggers:

$self->call_trigger( 'list_where_make_phrase', $c, $where );
$self->call_trigger( 'list_order_make_phrase', $c, $order );

SEE ALSO

Catalyst::Controller::CRUD, Class::DBI

AUTHOR

Jun Shimizu, <bayside@cpan.org>

COPYRIGHT AND LICENSE

Copyright (C) 2006,2007 by Jun Shimizu

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.2 or, at your option, any later version of Perl 5 you may have available.