/[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 65 by dpavlin, Wed Feb 21 20:24:34 2007 UTC revision 120 by dpavlin, Mon Apr 9 19:23:05 2007 UTC
# Line 26  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 =>          column owner =>
# Line 42  use Grep::Record schema { Line 42  use Grep::Record schema {
42                  filters are 'Jifty::DBI::Filter::DateTime',                  filters are 'Jifty::DBI::Filter::DateTime',
43                  since '0.0.5';                  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 63  sub search_uri { Line 70  sub search_uri {
70    
71          my $uri = $self->uri or die "no uri?";          my $uri = $self->uri or die "no uri?";
72          $uri =~ s/\Q|!|\E/;/g;          $uri =~ s/\Q|!|\E/;/g;
73            $uri =~ s/{x!(26|3b)}/chr(hex($1))/gei;
74          return sprintf( $uri, $search );          return sprintf( $uri, $search );
75  }  }
76    
# Line 77  sub current_user_can { Line 85  sub current_user_can {
85    
86          return 1 if ( $uid && ! $self->id );          return 1 if ( $uid && ! $self->id );
87    
88          Jifty->log->debug("current_user[$uid]_can($what) on Feed ", $self->id || '???', " owner ", $self->owner->id || '???');  #       Jifty->log->debug("current_user[$uid]_can($what) on Feed ", $self->id || '???', " owner ", $self->owner->id || '???');
89    
90          return 1 if ( $uid == $self->owner->id );          return 1 if ( $uid && $uid == $self->owner->id );
91    
92  }  }
93    
Legend:
Removed from v.65  
changed lines
  Added in v.120
  ViewVC Help
Powered by ViewVC 1.1.26