/[transports]/trunk/lib/Transports/Model/Destination.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/lib/Transports/Model/Destination.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 21 by dpavlin, Thu May 4 15:12:03 2006 UTC revision 22 by dpavlin, Fri May 26 18:35:08 2006 UTC
# Line 23  sub available_values { Line 23  sub available_values {
23          return $self->column("name")->valid_values;          return $self->column("name")->valid_values;
24  }  }
25    
26    =head2 current_user_can ACTION
27    
28    Let everybody create, read and update, but not delete.
29    
30    =cut
31    
32    sub current_user_can {
33        my $self = shift;
34        my $type = shift;
35    
36        # We probably want something like this eventually:
37        if ($type =~ /(?:create|read|update)/i) {
38            return 1;
39        } else {
40            return $self->SUPER::current_user_can($type, @_);
41        }
42    }
43    
44  1;  1;
45    
Legend:
Removed from v.21  
changed lines
  Added in v.22
  ViewVC Help
Powered by ViewVC 1.1.26