Fix perlcritic warnings
authorPeter Eisentraut <peter@eisentraut.org>
Fri, 21 Feb 2020 21:03:05 +0000 (22:03 +0100)
committerPeter Eisentraut <peter@eisentraut.org>
Fri, 21 Feb 2020 21:03:05 +0000 (22:03 +0100)
src/tools/msvc/Mkvcbuild.pm

index d6fc1b7d5422dc74e0c1ca4e7227b95d5b43f993..727a8fdec9b28492179ce4b8c25ee66868f5dd9d 100644 (file)
@@ -5,10 +5,11 @@ package Mkvcbuild;
 #
 # src/tools/msvc/Mkvcbuild.pm
 #
-use Carp;
-use if ($^O eq "MSWin32"), 'Win32';
 use strict;
 use warnings;
+
+use Carp;
+use if ($^O eq "MSWin32"), 'Win32';
 use Project;
 use Solution;
 use Cwd;
@@ -648,7 +649,7 @@ sub mkvcbuild
                    # 'Can't spawn "conftest.exe"'; suppress that.
                    no warnings;
 
-                   no strict 'subs';
+                   no strict 'subs'; ## no critic (ProhibitNoStrict)
 
                    # Disable error dialog boxes like we do in the postmaster.
                    # Here, we run code that triggers relevant errors.