Fix unescaped braces (deprecated with Perl 5.22) in t/plugin-checks.t
This commit is contained in:
1
debian/changelog
vendored
1
debian/changelog
vendored
@@ -9,6 +9,7 @@ xen-tools (4.6.2~dev-1) UNRELEASED; urgency=medium
|
|||||||
* Make t/hooks-inittab.t using its own copy of the generic /etc/inittab
|
* Make t/hooks-inittab.t using its own copy of the generic /etc/inittab
|
||||||
for testing instead of using the system one's. (GH#36, should fix
|
for testing instead of using the system one's. (GH#36, should fix
|
||||||
autopkgtest on systems with modified /etc/inittab)
|
autopkgtest on systems with modified /etc/inittab)
|
||||||
|
* Fix unescaped braces (deprecated with Perl 5.22) in t/plugin-checks.t.
|
||||||
|
|
||||||
-- Axel Beckert <abe@debian.org> Sat, 24 Oct 2015 02:37:47 +0200
|
-- Axel Beckert <abe@debian.org> Sat, 24 Oct 2015 02:37:47 +0200
|
||||||
|
|
||||||
|
|||||||
@@ -83,7 +83,7 @@ sub testFile
|
|||||||
|
|
||||||
foreach my $line ( <FILY> )
|
foreach my $line ( <FILY> )
|
||||||
{
|
{
|
||||||
if ( $line =~ /\$CONFIG{[ \t'"]+(.*)[ \t'"]+}/ )
|
if ( $line =~ /\$CONFIG\{[ \t'"]+(.*)[ \t'"]+\}/ )
|
||||||
{
|
{
|
||||||
close( FILY );
|
close( FILY );
|
||||||
return $line;
|
return $line;
|
||||||
|
|||||||
Reference in New Issue
Block a user