diff options
author | dakkar <dakkar@thenautilus.net> | 2012-12-14 15:20:06 +0000 |
---|---|---|
committer | dakkar <dakkar@thenautilus.net> | 2012-12-14 15:20:06 +0000 |
commit | 261240c20b86254136aa80a6baa58e7b3f8692a8 (patch) | |
tree | 0027071c349e288078bc06d03db3df185f010d56 /lib/Feed | |
parent | more de-undef (diff) | |
download | feeder-261240c20b86254136aa80a6baa58e7b3f8692a8.tar.gz feeder-261240c20b86254136aa80a6baa58e7b3f8692a8.tar.bz2 feeder-261240c20b86254136aa80a6baa58e7b3f8692a8.zip |
logging uris
Diffstat (limited to 'lib/Feed')
-rw-r--r-- | lib/Feed/Utils.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/Feed/Utils.pm b/lib/Feed/Utils.pm index 60ea383..48a4dc9 100644 --- a/lib/Feed/Utils.pm +++ b/lib/Feed/Utils.pm @@ -69,6 +69,8 @@ sub feeds_from_opml { } catch { warn $_; return }; return unless $opml; + Log::Log4perl::MDC->put( opml => "$opml_source" ); + my @exclude = @{$opts->{exclude} // []}; for my $feed_node ($opml->findnodes(q{/opml/body/outline[@xmlUrl != '']})) { |