From e840604c4b1656dfc7680634af719b4df6093d61 Mon Sep 17 00:00:00 2001 From: Gianni Ceccarelli Date: Tue, 18 Dec 2012 10:04:08 +0000 Subject: clean MDC --- lib/Feed.pm | 7 +++++++ lib/Feed/Utils.pm | 2 ++ 2 files changed, 9 insertions(+) (limited to 'lib') diff --git a/lib/Feed.pm b/lib/Feed.pm index ece6724..7264638 100644 --- a/lib/Feed.pm +++ b/lib/Feed.pm @@ -59,6 +59,13 @@ sub BUILD { return; } +sub DEMOLISH { + + Log::Log4perl::MDC->put( uri => undef ); + + return; +} + sub extract_title { my ($self) = @_; diff --git a/lib/Feed/Utils.pm b/lib/Feed/Utils.pm index 48a4dc9..ab6b27b 100644 --- a/lib/Feed/Utils.pm +++ b/lib/Feed/Utils.pm @@ -83,6 +83,8 @@ sub feeds_from_opml { feed(%$common_args,title=>$title,uri=>$uri); } + Log::Log4perl::MDC->put( opml => undef ); + return; } -- cgit v1.2.3