From 8e9433f86979d3c4efe49fdab9648c052e2390a7 Mon Sep 17 00:00:00 2001
From: dakkar <dakkar@thenautilus.net>
Date: Sat, 21 Jun 2014 15:56:22 +0100
Subject: silence warns on 5.20

---
 lib/Feed.pm       | 4 ++--
 lib/Feed/Utils.pm | 2 ++
 2 files changed, 4 insertions(+), 2 deletions(-)

(limited to 'lib')

diff --git a/lib/Feed.pm b/lib/Feed.pm
index 177e484..09e9dd9 100644
--- a/lib/Feed.pm
+++ b/lib/Feed.pm
@@ -136,8 +136,8 @@ sub get_feed {
 
     $content =~ s{^\s*}{}; # some feed have invalid whitespace at the beginning
 
-    return XML::Feed->parse(\$content)
-        or die XML::Feed->errstr;
+    return( XML::Feed->parse(\$content)
+        or die XML::Feed->errstr );
 }
 
 sub extract_entries {
diff --git a/lib/Feed/Utils.pm b/lib/Feed/Utils.pm
index ab6b27b..7a6c5bb 100644
--- a/lib/Feed/Utils.pm
+++ b/lib/Feed/Utils.pm
@@ -78,6 +78,8 @@ sub feeds_from_opml {
             // $feed_node->findvalue('@text') // '';
         my $uri = $feed_node->findvalue('@xmlUrl');
 
+        no warnings 'experimental::smartmatch';
+
         next if $uri ~~ @exclude;
 
         feed(%$common_args,title=>$title,uri=>$uri);
-- 
cgit v1.2.3