From ab6cd0c6f010a35de48385cb1a5e9c57faf6e2eb Mon Sep 17 00:00:00 2001
From: Gianni Ceccarelli <gianni.ceccarelli@net-a-porter.com>
Date: Sat, 23 Mar 2013 11:21:55 +0000
Subject: use my own metacpan feed

---
 feeder.pl   | 6 +++++-
 lib/Feed.pm | 2 +-
 2 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/feeder.pl b/feeder.pl
index 6a11f99..30d1589 100644
--- a/feeder.pl
+++ b/feeder.pl
@@ -128,7 +128,11 @@ feeds(
         mail_folders => 'Perl',
     },
     'http://www.simon-cozens.org/blogs/simon/feed',
-    'http://search.cpan.org/uploads.rdf',
+    #'https://metacpan.org/feed/recent',
+    {
+        uri => 'file:///var/www/thenautilus/htdocs/metacpan.atom',
+        title => 'Recent CPAN uploads - MetaCPAN',
+    },
     'http://pugs.blogs.com/pugs/index.rdf',
     'http://blog.plover.com/index.atom',
     'http://blogs.perl.org/atom.xml',
diff --git a/lib/Feed.pm b/lib/Feed.pm
index 0bfe224..177e484 100644
--- a/lib/Feed.pm
+++ b/lib/Feed.pm
@@ -100,7 +100,7 @@ sub build_user_agent {
         },
         timeout => 30,
         cookie_jar => {},
-        protocols_allowed => [ 'http', 'https'],
+        protocols_allowed => [ 'http', 'https', 'file' ],
         default_headers => HTTP::Request->new(
             Accept => '*/*',
         ),
-- 
cgit v1.2.3