Changeset 63
- Timestamp:
- 02/09/06 17:00:51
- Files:
-
- trunk/plagger/config.yaml.sample (modified) (1 diff)
- trunk/plagger/lib/Plagger/Plugin/SmartFeed (moved) (moved from trunk/plagger/lib/Plagger/Plugin/Splice)
- trunk/plagger/lib/Plagger/Plugin/SmartFeed/Tag.pm (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/plagger/config.yaml.sample
r54 r63 31 31 - module: Aggregator::Simple 32 32 33 - module: S plice::Tag33 - module: SmartFeed::Tag 34 34 config: 35 35 tag: perl tech trunk/plagger/lib/Plagger/Plugin/SmartFeed/Tag.pm
r61 r63 1 package Plagger::Plugin::S plice::Tag;1 package Plagger::Plugin::SmartFeed::Tag; 2 2 use strict; 3 3 use base qw( Plagger::Plugin ); … … 9 9 $context->register_hook( 10 10 $self, 11 'update.fixup' => \& splicer,11 'update.fixup' => \&fixup, 12 12 ); 13 13 } 14 14 15 sub splicer{15 sub fixup { 16 16 my($self, $context) = @_; 17 17 … … 20 20 21 21 my $feed = Plagger::Feed->new; 22 $feed->type('s pliced:tag');23 $feed->id( $self->conf->{id} || ('s pliced:tag:' . join('+', @tags)) );22 $feed->type('smartfeed:tag'); 23 $feed->id( $self->conf->{id} || ('smartfeed:tag:' . join('+', @tags)) ); 24 24 $feed->title( $self->conf->{title} || $self->gen_title($op, @tags) ); 25 25
