]> eyrie.org Git - kerberos/krb5-strength.git/blobdiff - tests/perl/critic-t
Update to rra-c-util 10.5
[kerberos/krb5-strength.git] / tests / perl / critic-t
index 6f6e680ba3adc104de8657c8d84f618a1f7d07ac..fedc3804f59b13744c811e86dd341c3e7c38417a 100755 (executable)
@@ -6,7 +6,7 @@
 # which can be found at <https://www.eyrie.org/~eagle/software/rra-c-util/>.
 #
 # Written by Russ Allbery <eagle@eyrie.org>
-# Copyright 2016, 2019 Russ Allbery <eagle@eyrie.org>
+# Copyright 2016, 2019, 2021-2022 Russ Allbery <eagle@eyrie.org>
 # Copyright 2012-2014
 #     The Board of Trustees of the Leland Stanford Junior University
 #
@@ -30,7 +30,7 @@
 #
 # SPDX-License-Identifier: MIT
 
-use 5.008;
+use 5.010;
 use strict;
 use warnings;
 
@@ -53,22 +53,12 @@ automake_setup();
 # Load prerequisite modules.
 use_prereq('Test::Perl::Critic');
 
-# Due to an annoying bug in Perl::Tidy 20130922, we cannot run tests if the
-# source directory is read-only.  It unconditionally tries to create a log
-# file in the current directory and fails to run any checks if it cannot.
-if (!-w File::Spec->curdir()) {
-    plan skip_all => 'Perl::Tidy needs writable source directory';
-}
-
 # Force the embedded Perl::Tidy check to use the correct configuration.
 local $ENV{PERLTIDY} = test_file_path('data/perltidyrc');
 
 # Import the configuration file.
-Test::Perl::Critic->import(-profile => test_file_path('data/perlcriticrc'));
+my $config_path = test_file_path('data/perlcriticrc');
+Test::Perl::Critic->import(-profile => $config_path);
 
 # Finally, run the actual tests.
 all_critic_ok(perl_dirs({ skip => [@CRITIC_IGNORE] }));
-
-# On Debian with perltidy 20130922-1, a perltidy.LOG file gets left behind
-# in the current directory.  Remove it if it exists.
-unlink('perltidy.LOG');