Package: libclass-makemethods-perl / 1.01-5

Class-MakeMethods-1.01-RT115108.patch Patch series | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
From 27527ee2c701afa69326dcd2748b2182436c42e9 Mon Sep 17 00:00:00 2001
From: Slaven Rezic <slaven@rezic.de>
Date: Wed, 8 Jun 2016 22:47:42 +0200
Subject: [PATCH] fix for "Unescaped left brace in regex is deprecated" (RT
 #115108)

Bug: https://rt.cpan.org/Public/Bug/Display.html?id=115108
Bug-Debian: https://bugs.debian.org/826476

---
 tests/xemulator/class_methodmaker/Test.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tests/xemulator/class_methodmaker/Test.pm b/tests/xemulator/class_methodmaker/Test.pm
index fc37552..4ab84ad 100644
--- a/tests/xemulator/class_methodmaker/Test.pm
+++ b/tests/xemulator/class_methodmaker/Test.pm
@@ -48,7 +48,7 @@ sub COUNT_TESTS {
   open(IN, $file) or die "Can't open $file: $!";
   while (<IN>) {
     /^\s*#/ and next;
-    $c += s/(TEST\s{)/$1/g;
+    $c += s/(TEST\s\{)/$1/g;
   }
   $c;
 }
-- 
2.1.4