/[A3C]/lib/A3C/Model/Person.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 /lib/A3C/Model/Person.pm

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

revision 66 by dpavlin, Wed Apr 9 23:14:47 2008 UTC revision 73 by dpavlin, Fri Apr 11 15:49:50 2008 UTC
# Line 36  use A3C::Record schema { Line 36  use A3C::Record schema {
36                  type is 'text',                  type is 'text',
37                  is mandatory,                  is mandatory,
38                  label is _('Email address'), default is '',                  label is _('Email address'), default is '',
39                    is indexed,
40                  is immutable,                  is immutable,
41                  is distinct;                  is distinct;
42    
# Line 333  Accessor for compatibility with Jifty mi Line 334  Accessor for compatibility with Jifty mi
334    
335  sub email {  sub email {
336          my $self = shift;          my $self = shift;
337          return $self->__value('mail');          return $self->mail;
338  }  }
339    
340  sub email_confirmed { 1 };  sub email_confirmed { 1 };
# Line 344  sub email_confirmed { 1 }; Line 345  sub email_confirmed { 1 };
345    
346  sub name {  sub name {
347          my $self = shift;          my $self = shift;
348          return $self->__value('cn') . ' <' . $self->__value('mail') . '>';          return $self->cn . ' <' . $self->mail . '>';
349  }  }
350    
351  =head2 validate_telephoneNumber  =head2 validate_telephoneNumber
# Line 416  sub canonicalize_hrEduPersonExpireDate { Line 417  sub canonicalize_hrEduPersonExpireDate {
417          return $value;          return $value;
418  }  }
419    
420  =head2 current_user_can  use A3C::DefaultACL;
   
 =cut  
   
 sub current_user_can {  
         # FIXME no security for now :-)  
         return 1;  
 }  
   
421    
422  1;  1;
423    
Legend:
Removed from v.66  
changed lines
  Added in v.73
  ViewVC Help
Powered by ViewVC 1.1.26