Parent Directory | Revision Log
added users/passowrds all over the place
1 | dpavlin | 2 | use strict; |
2 | use warnings; | ||
3 | |||
4 | package Arh::Model::Location; | ||
5 | use Jifty::DBI::Schema; | ||
6 | |||
7 | use Arh::Record schema { | ||
8 | |||
9 | column name => | ||
10 | dpavlin | 3 | label is _("Name"), |
11 | is mandatory; | ||
12 | dpavlin | 2 | |
13 | column address => | ||
14 | label is _("Address"); | ||
15 | |||
16 | column city => | ||
17 | label is _("City"); | ||
18 | |||
19 | column country => | ||
20 | label is _("Country"); | ||
21 | |||
22 | column note => | ||
23 | label is _("Note"); | ||
24 | |||
25 | }; | ||
26 | |||
27 | dpavlin | 10 | #use Jifty::Plugin::ActorMetadata::Mixin::Model::ActorMetadata; # created_by, created_on, updated_on |
28 | |||
29 | dpavlin | 2 | # Your model-specific methods go here. |
30 | |||
31 | dpavlin | 4 | sub since { '0.0.3' } |
32 | |||
33 | dpavlin | 10 | sub current_user_can { |
34 | my ( $self, $action,$item,$name ) = @_; | ||
35 | return 1 if $self->current_user->superuser || $self->current_user->administrator; | ||
36 | return 1 if $self->current_user->id && $action eq 'read'; | ||
37 | return 0; | ||
38 | } | ||
39 | |||
40 | dpavlin | 2 | 1; |
41 |
ViewVC Help | |
Powered by ViewVC 1.1.26 |