/[SQLSession]/trunk/lib/SQLSession/Model/Query.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/SQLSession/Model/Query.pm

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

revision 61 by dpavlin, Thu Jan 25 19:05:04 2007 UTC revision 62 by dpavlin, Thu Jan 25 19:16:18 2007 UTC
# Line 43  use SQLSession::Record schema { Line 43  use SQLSession::Record schema {
43                  refers_to SQLSession::Model::User by 'id',                  refers_to SQLSession::Model::User by 'id',
44                  label is 'Query owner',                  label is 'Query owner',
45                  default is defer { Jifty->web->current_user->id || 0 },                  default is defer { Jifty->web->current_user->id || 0 },
                 mandatory,  
46                  since '0.0.6';                  since '0.0.6';
47    
48          column created_on =>          column created_on =>
# Line 72  sub current_user_can { Line 71  sub current_user_can {
71                  return 1;                  return 1;
72          };          };
73    
74            return 1 if ($self->current_user->role('edit'));
75    
76          return 0;          return 0;
77  }  }
78    
Legend:
Removed from v.61  
changed lines
  Added in v.62
  ViewVC Help
Powered by ViewVC 1.1.26