From dd3cdbaf21841205a47d980a6678672973847d10 Mon Sep 17 00:00:00 2001
From: Guillem Jover <guillem@debian.org>
Date: Wed, 17 May 2017 23:42:17 +0200
Subject: test: Enable perlcritic Miscellanea::ProhibitTies

---
 scripts/Dpkg/Compression/FileHandle.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'scripts/Dpkg/Compression')

diff --git a/scripts/Dpkg/Compression/FileHandle.pm b/scripts/Dpkg/Compression/FileHandle.pm
index dd9ae6966..d7014e8c4 100644
--- a/scripts/Dpkg/Compression/FileHandle.pm
+++ b/scripts/Dpkg/Compression/FileHandle.pm
@@ -129,7 +129,7 @@ sub new {
     my $self = IO::File->new();
     # Tying is required to overload the open functions and to auto-open
     # the file on first read/write operation
-    tie *$self, $class, $self;
+    tie *$self, $class, $self; ## no critic (Miscellanea::ProhibitTies)
     bless $self, $class;
     # Initializations
     *$self->{compression} = 'auto';
-- 
cgit v1.2.3