From ea5d5fe4d5617326ec61c26157bca886b8614435 Mon Sep 17 00:00:00 2001 From: dakkar Date: Sun, 9 Dec 2012 15:16:41 +0000 Subject: maildir publisher --- feeder.pl | 24 +++++++++++++++++++----- 1 file changed, 19 insertions(+), 5 deletions(-) (limited to 'feeder.pl') diff --git a/feeder.pl b/feeder.pl index 8a96805..e0bd7ba 100644 --- a/feeder.pl +++ b/feeder.pl @@ -14,7 +14,7 @@ log4perl.appender.Screen.layout.ConversionPattern = [%d{ISO8601}] (%c) %m{chomp} LOG my $feed_class = Feed->with_traits( - 'Printer', + 'MailDir', 'FixDateTime', 'DeDupe', 'AuthorName', @@ -24,12 +24,26 @@ sub feed { my (%args) = @_; my $feed = $feed_class->new({ dupe_dsn => 'dbi:SQLite:dbname=dedup.db', + maildir_base => 'maildir', %args, }); $feed->process; } -feed(uri=>'http://www.gentoo.org/rdf/en/gentoo-news.rdf'); -feed(uri=>'http://feeds2.feedburner.com/sydneypadua/yBZX'); -feed(uri=>'http://oglaf.com/feeds/rss/'); -feed(uri=>'http://feeds.gawker.com/io9/full'); +feed( + uri=>'http://www.gentoo.org/rdf/en/gentoo-news.rdf', + mail_folders => 'Gentoo', +); +feed( + uri=>'http://feeds2.feedburner.com/sydneypadua/yBZX', + mail_folders => 'Fun', +); +feed( + uri=>'http://oglaf.com/feeds/rss/', + title=>'Oglaf', + mail_folders => 'Fun', +); +feed( + uri=>'http://feeds.gawker.com/io9/full', + mail_folders => 'Weblogs', +); -- cgit v1.2.3