/[Grep]/lib/Grep/Model/Item.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/Grep/Model/Item.pm

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

revision 127 by dpavlin, Sun Apr 29 00:16:05 2007 UTC revision 128 by dpavlin, Sun Apr 29 00:48:04 2007 UTC
# Line 62  sub current_user_can { Line 62  sub current_user_can {
62  #       Jifty->log->debug("current_user[$uid]_can($what) on Item ", $self->id || '???', " owner ", $owner_id || '???');  #       Jifty->log->debug("current_user[$uid]_can($what) on Item ", $self->id || '???', " owner ", $owner_id || '???');
63    
64          return 1 if ( $uid && $owner_id && $uid == $owner_id );          return 1 if ( $uid && $owner_id && $uid == $owner_id );
65    
66            # system user
67            return 1 if ( defined( $uid ) && $uid == 0 );
68    
69            warn "$uid can't $what";
70  }  }
71    
72    =for TODO
73    
74  sub after_create {  sub after_create {
75          my $self                    = shift;          my $self                    = shift;
76          my $insert_return_value_ref = shift;          my $insert_return_value_ref = shift;
# Line 73  sub after_create { Line 80  sub after_create {
80    
81          # Do whatever needs to be done here          # Do whatever needs to be done here
82    
83          warn "after_create ", dump( $self->as_hash );  #       use Data::Dump qw/dump/;
84    #       warn "after_create ", dump( $self->as_hash );
85    
86          return; # return value is ignored          return; # return value is ignored
87  }  }
88    
89    =cut
90    
91  1;  1;
92    
Legend:
Removed from v.127  
changed lines
  Added in v.128
  ViewVC Help
Powered by ViewVC 1.1.26