Merge pull request #2632 from drgrice1/perltidy-update

Switch to using Perl::Tidy version 20240903 (the latest).

Author: somiaj

.github/workflows/check-formats.yml

@@ -20,7 +20,7 @@ jobs:
       - name: Checkout code
         uses: actions/checkout@v4
       - name: Install dependencies
-        run: cpanm -n Perl::Tidy@20220613
+        run: cpanm -n Perl::Tidy@20240903
       - name: Run perltidy
         shell: bash
         run: |

.perltidyrc

@@ -20,4 +20,3 @@
 -nlop   # No logical padding (this causes mixed tabs and spaces)
 -wn     # Weld nested containers
 -xci    # Extended continuation indentation
--vxl='q' # No vertical alignment of qw quotes

bin/check_modules.pl

@@ -165,7 +165,6 @@ =head1 DESCRIPTION
 	'LWP::Protocol::https' => 6.06,
 	'Mojolicious'          => 9.34,
 	'Net::SSLeay'          => 1.46,
-	'Perl::Tidy'           => 20220613,
 	'SQL::Abstract'        => 2.000000
 );
 

bin/crypt_passwords_in_classlist.pl

@@ -13,7 +13,7 @@ BEGIN
 
 use lib "$ENV{WEBWORK_ROOT}/lib";
 
-use WeBWorK::Utils qw(cryptPassword);
+use WeBWorK::Utils           qw(cryptPassword);
 use WeBWorK::File::Classlist qw(parse_classlist write_classlist);
 
 unless (@ARGV == 1) {

bin/dev_scripts/PODtoHTML.pm

@@ -23,8 +23,8 @@ use Pod::Simple::Search;
 use Mojo::Template;
 use Mojo::DOM;
 use Mojo::Collection qw(c);
-use File::Path qw(make_path);
-use File::Basename qw(dirname);
+use File::Path       qw(make_path);
+use File::Basename   qw(dirname);
 use IO::File;
 use POSIX qw(strftime);
 

bin/dev_scripts/generate-ww-pg-pod.pl

@@ -65,9 +65,9 @@ =head1 DESCRIPTION
 use Mojo::Template;
 use IO::File;
 use File::Copy;
-use File::Path qw(make_path remove_tree);
+use File::Path     qw(make_path remove_tree);
 use File::Basename qw(dirname);
-use Cwd qw(abs_path);
+use Cwd            qw(abs_path);
 
 use lib dirname(dirname(dirname(__FILE__))) . '/lib';
 use lib dirname(__FILE__);

bin/dev_scripts/run-perltidy.pl

@@ -63,9 +63,8 @@ =head1 OPTIONS
 
 my $webwork_root = curfile->dirname->dirname->dirname;
 
-die "Version 20220613 or newer of perltidy is required for this script.\n"
-	. "The installed version is $Perl::Tidy::VERSION.\n"
-	unless $Perl::Tidy::VERSION >= 20220613;
+die "Version 20240903 of perltidy is required for this script.\nThe installed version is $Perl::Tidy::VERSION.\n"
+	unless $Perl::Tidy::VERSION == 20240903;
 die "The .perltidyrc file in the webwork root directory is not readable.\n"
 	unless -r "$webwork_root/.perltidyrc";
 

bin/download-OPL-metadata-release.pl

@@ -15,7 +15,7 @@
 
 BEGIN {
 	use Mojo::File qw(curfile);
-	use Env qw(WEBWORK_ROOT);
+	use Env        qw(WEBWORK_ROOT);
 
 	$WEBWORK_ROOT = curfile->dirname->dirname;
 }

bin/dump-OPL-tables.pl

@@ -22,7 +22,7 @@
 
 BEGIN {
 	use Mojo::File qw(curfile);
-	use Env qw(WEBWORK_ROOT);
+	use Env        qw(WEBWORK_ROOT);
 
 	$WEBWORK_ROOT = curfile->dirname->dirname;
 }

bin/dump-past-answers.pl

@@ -98,7 +98,7 @@ =head1 DESCRIPTION
 
 BEGIN {
 	use Mojo::File qw(curfile);
-	use Env qw(WEBWORK_ROOT);
+	use Env        qw(WEBWORK_ROOT);
 	$WEBWORK_ROOT = curfile->dirname->dirname;
 }