10 |
|
|
11 |
sub object_type { 'Unit' }; |
sub object_type { 'Unit' }; |
12 |
|
|
13 |
|
sub per_page { get('per_page') || 5 }; |
14 |
|
|
15 |
sub display_columns { |
sub display_columns { |
16 |
my $self = shift; |
my $self = shift; |
17 |
return ( qw/ |
return ( qw/ |
58 |
|
|
59 |
#private template search_region => sub {}; |
#private template search_region => sub {}; |
60 |
|
|
61 |
|
private template 'paging_top' => sub { |
62 |
|
my $self = shift; |
63 |
|
my $collection = shift; |
64 |
|
my $page = shift || 1; |
65 |
|
|
66 |
|
if ( $collection->pager->last_page > 1 ) { |
67 |
|
span { |
68 |
|
{ class is 'page-count' }; |
69 |
|
outs( |
70 |
|
_( "Found %1 units, showing %2-%3 on page %4/%5", |
71 |
|
$collection->pager->total_entries, |
72 |
|
$collection->pager->first, |
73 |
|
$collection->pager->last, |
74 |
|
$page, |
75 |
|
$collection->pager->last_page |
76 |
|
) |
77 |
|
); |
78 |
|
} |
79 |
|
} |
80 |
|
|
81 |
|
show( './paging_bottom', $collection, $page ); |
82 |
|
|
83 |
|
}; |
84 |
|
|
85 |
|
|
86 |
template 'view' => sub :CRUDView { |
template 'view' => sub :CRUDView { |
87 |
my $self = shift; |
my $self = shift; |
88 |
my $id = get('id'); |
my $id = get('id'); |
167 |
my $self = shift; |
my $self = shift; |
168 |
return unless $self->current_user->editing; |
return unless $self->current_user->editing; |
169 |
|
|
170 |
my ( $object_type, $id ) = ( $self->object_type, get('id') ); |
my ( $object_type, $id ) = ( $self->object_type, get('id') ); |
171 |
my $record_class = $self->record_class; |
my $record_class = $self->record_class; |
172 |
my $create = $record_class->as_create_action; |
my $create = $record_class->as_create_action; |
173 |
|
|
174 |
h1 { _("New unit") }; |
h1 { _("New unit") }; |
175 |
|
|