Parent Directory | Revision Log | Patch
revision 10 by dpavlin, Thu Nov 29 17:17:16 2007 UTC | revision 13 by dpavlin, Fri Nov 30 00:03:15 2007 UTC | |
---|---|---|
# | Line 69 sub current_user_can { | Line 69 sub current_user_can { |
69 | warn "current_user_can $action | $item | ", $name ? $name : 'NO NAME', "\n"; | warn "current_user_can $action | $item | ", $name ? $name : 'NO NAME', "\n"; |
70 | ||
71 | if ( $action eq 'read' && $item eq 'column' ) { | if ( $action eq 'read' && $item eq 'column' ) { |
72 | foreach ( qw/name email organization phonenumber/ ) { | foreach ( qw/name lastname email organization/) { |
73 | return 1 if $name eq $_; | return 1 if $name eq $_; |
74 | } | } |
75 | return 0; | return 0; |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |