From fafcb77fd780d0c57aa7ba8471a9e05fbc16ef37 Mon Sep 17 00:00:00 2001
From: Gianni Ceccarelli <gianni.ceccarelli@net-a-porter.com>
Date: Tue, 19 Mar 2013 17:43:21 +0000
Subject: make it run under 5.12

---
 meta.pl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/meta.pl b/meta.pl
index 26eefc1..f83cfaf 100644
--- a/meta.pl
+++ b/meta.pl
@@ -1,7 +1,7 @@
 #!/usr/bin/env perl
 use strict;
 use warnings;
-use 5.014;
+use 5.012;
 use MetaCPAN::API;
 use Text::Diff;
 use XML::Feed;
@@ -11,7 +11,7 @@ use HTML::Escape 'escape_html';
 
 my $api = MetaCPAN::API->new();
 
-package Release {
+{package Release;
 use Moose;
 has [qw(distribution name author date abstract)] => (
     is => 'ro',
@@ -182,7 +182,7 @@ sub build_entry {
 
     my $content = sprintf '<p>%s</p>',
                  escape_html($release->abstract);
-    if ($diff->{diff}) {
+    if (exists $diff->{diff}) {
         $content .= sprintf '<pre>%s</pre>',
             escape_html($diff->{diff});
     }
-- 
cgit v1.2.3