Parent Directory | Revision Log | Patch
revision 43 by dpavlin, Sat May 27 22:54:11 2006 UTC | revision 44 by dpavlin, Tue May 30 14:07:50 2006 UTC | |
---|---|---|
# | Line 41 sub current_user_can { | Line 41 sub current_user_can { |
41 | ||
42 | return 1 if ($self->current_user->admin); | return 1 if ($self->current_user->admin); |
43 | ||
44 | return 1 if ($type eq 'read'); | |
45 | ||
46 | # We probably want something like this eventually: | # We probably want something like this eventually: |
47 | if ($type =~ /(?:create|read|update)/i) { | if ($type =~ /(?:create|update)/i) { |
48 | ||
49 | my $uos = Transports::Model::UserOnSource->new(); | my $uos = Transports::Model::UserOnSource->new(); |
50 | $uos->load_by_cols( | $uos->load_by_cols( |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |