From 75e840cae6ed5104325ae46bd926c5ea2f782a20 Mon Sep 17 00:00:00 2001
From: Steve Hay <steve.m.hay@googlemail.com>
Date: Thu, 3 Oct 2013 13:11:26 +0100
Subject: [PATCH] Porting/corelist.pl - Fix breakage since commit c676c8385f

---
 Porting/corelist.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Porting/corelist.pl b/Porting/corelist.pl
index 9f13b1e..5d302d3 100755
--- a/Porting/corelist.pl
+++ b/Porting/corelist.pl
@@ -165,8 +165,8 @@ for my $key (sort keys($delta_data->{removed} || {})) {
 $versions_in_release .= "        }\n";
 $versions_in_release .= "    },\n";
 
-$corelist =~ s/^(my %delta\s*=\s*.*?)^\s*$perl_vnum\s*=>\s*{.*?},\s*(^\);)$/$1$2/ism;
-$corelist =~ s/^(my %delta\s*=\s*.*?)(^\);)$/$1$versions_in_release$2/ism;
+$corelist =~ s/^(%delta\s*=\s*.*?)^\s*$perl_vnum\s*=>\s*{.*?},\s*(^\);)$/$1$2/ism;
+$corelist =~ s/^(%delta\s*=\s*.*?)(^\);)$/$1$versions_in_release$2/ism;
 
 exit unless %modlist;
 
-- 
2.7.4