Catalyst::Controller::CRUD::DBIC - Implementation for Catalyst::Controller::CRUD

  package MyApp;

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

  1;

  package MyApp::Controller::User;

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

  sub setting {
      my ( $self, $c ) = @_;
      my $hash = {
          'name'     => 'user',
          'type'     => 'DBIC',
          'model'    => 'DBIC::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;

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

 - get_model
 - get_models

None by default.

This method returns model object having $id.

Triggers:

 $self->call_trigger( 'get_model_after', $c, $hash );

This method returns model objects.

Catalyst::Controller::CRUD, DBIx::Class

Jun Shimizu, <bayside@cpan.org>

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.