NAME
Catalyst::Controller::CRUD::CDBI - Implementation for Catalyst::Controller::CRUD
SYNOPSIS
MyApp/lib/MyApp.pm
MyApp/lib/MyApp/Controller/User.pm
package
MyApp::Controller::User;
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.
Triggers:
$self
->call_trigger(
'get_model_after'
,
$c
,
$hash
);
get_models($this,$c,$self)
This method returns model objects.
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.