From 19384d737d8221d16cd1108bc3e4bea2aa93862b Mon Sep 17 00:00:00 2001 From: Moritz Bunkus Date: Mon, 18 Apr 2011 11:11:36 +0200 Subject: [PATCH] False positive in Test "my $foo = @bar" vermeiden --- t/structure/common_errors.t | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/t/structure/common_errors.t b/t/structure/common_errors.t index 6e73070b1..c23c6b480 100644 --- a/t/structure/common_errors.t +++ b/t/structure/common_errors.t @@ -32,7 +32,7 @@ my @testitems = @Support::Files::testitems; my @common_errors = ([ '^\s*my\s+%[a-z0-9_]+\s*=\s*shift' ], [ '^\s*my\s+\(.*\)\s*=\s*shift' ], - [ '^\s*my\s+\$.*\s*=\s*@_' ], + [ '^\s*my\s+\$[^=]*=\s*@_' ], [ '@[a-z0-9_]+->' ], [ 'uft8' ], [ '\$slef' ], -- 2.20.1