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

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

revision 37 by dpavlin, Tue Feb 20 10:32:30 2007 UTC revision 73 by dpavlin, Fri Feb 23 11:48:39 2007 UTC
# Line 5  package Grep::Model::Feed; Line 5  package Grep::Model::Feed;
5  use Jifty::DBI::Schema;  use Jifty::DBI::Schema;
6    
7  use Feed::Find;  use Feed::Find;
8    use Scalar::Defer;
9    use Grep::Model::User;
10    
11  use Grep::Record schema {  use Grep::Record schema {
12    
# Line 12  use Grep::Record schema { Line 14  use Grep::Record schema {
14                  type is 'text',                  type is 'text',
15                  label is 'URI',                  label is 'URI',
16                  hints is 'Replace search string in URI with %s (grep will be replaced automatically)',                  hints is 'Replace search string in URI with %s (grep will be replaced automatically)',
17                  is mandatory,                  is mandatory;
                 distinct;  
18    
19          column title =>          column title =>
20                  type is 'text',                  type is 'text',
# Line 25  use Grep::Record schema { Line 26  use Grep::Record schema {
26                  type is 'text',                  type is 'text',
27                  label is 'Cookie',                  label is 'Cookie',
28                  render as 'textarea',                  render as 'textarea',
29                  hints are 'If you leave Cookie data Grep will impersonate you to feed provider!',                  hints is 'If you leave Cookie data Grep will impersonate you to feed provider!',
30                  since '0.0.3';                  since '0.0.3';
31    
32            column owner =>
33                    refers_to Grep::Model::User by 'id',
34                    label is 'Feed owner',
35                    default is defer { Jifty->web->current_user->id },
36                    since '0.0.5';
37    
38            column created_on =>
39                    type is 'timestamp',
40                    label is 'Created On',
41                    default is defer { DateTime->now },
42                    filters are 'Jifty::DBI::Filter::DateTime',
43                    since '0.0.5';
44    
45            column source =>
46                    type is 'text',
47                    label is 'Source',
48                    default is 'Grep::Source::Feed',
49    #               available are defer { Grep::Source::Feed->sources },
50                    since '0.0.6';
51    
52  };  };
53    
54  sub since { '0.0.1' }  sub since { '0.0.1' }
# Line 57  sub current_user_can { Line 78  sub current_user_can {
78          my $self = shift;          my $self = shift;
79          my $what = shift;          my $what = shift;
80    
81          Jifty->log->debug("current_user_can($what) on feed ", $self->id);          my $uid = Jifty->web->current_user->id;
82    
83            return 1 if ( $uid && $what eq 'create' );
84    
85            return 1 if ( $uid && ! $self->id );
86    
87    #       Jifty->log->debug("current_user[$uid]_can($what) on Feed ", $self->id || '???', " owner ", $self->owner->id || '???');
88    
89            return 1 if ( $uid == $self->owner->id );
90    
         return 1 if Jifty->web->current_user->id;  
91  }  }
92    
93  1;  1;
Legend:
Removed from v.37  
changed lines
  Added in v.73
  ViewVC Help
Powered by ViewVC 1.1.26