From: Steve Hancock <perltidy@users.sourceforge.net>
Date: Sat, 19 Feb 2022 01:47:07 +0000 (-0800)
Subject: fix failing tests by adding -npro
X-Git-Tag: 20220217.01~3
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=97e6c1a723c6ba4a4de79c265956283404bf9fd9;p=perltidy.git

fix failing tests by adding -npro
---

diff --git a/t/testwide-passthrough.t b/t/testwide-passthrough.t
index 6a006001..643023d3 100644
--- a/t/testwide-passthrough.t
+++ b/t/testwide-passthrough.t
@@ -43,7 +43,7 @@ sub test_file2file {
     note("Testing file2file: '$source' => '$destination'\n");
 
     my $tidyresult = Perl::Tidy::perltidy(
-        argv        => '-utf8',
+        argv        => '-utf8 -npro',
         source      => $source,
         destination => $destination
     );
@@ -68,7 +68,7 @@ sub test_scalar2scalar {
     note("Testing scalar2scalar\n");
 
     my $tidyresult = Perl::Tidy::perltidy(
-        argv        => '-utf8 -eos',
+        argv        => '-utf8 -eos -npro',
         source      => \$source,
         destination => \$destination
     );
@@ -90,7 +90,7 @@ sub test_scalararray2scalararray {
     note("Testing scalararray2scalararray\n");
 
     my $tidyresult = Perl::Tidy::perltidy(
-        argv        => '-utf8 -eos',
+        argv        => '-utf8 -eos -npro',
         source      => $source,
         destination => $destination
     );
diff --git a/t/testwide-tidy.t b/t/testwide-tidy.t
index 723d0887..1dd12dc9 100644
--- a/t/testwide-tidy.t
+++ b/t/testwide-tidy.t
@@ -45,7 +45,7 @@ sub test_file2file {
     note("Testing file2file: '$source' => '$destination'\n");
 
     my $tidyresult = Perl::Tidy::perltidy(
-        argv        => '-utf8',
+        argv        => '-utf8 -npro',
         source      => $source,
         destination => $destination
     );
@@ -70,7 +70,7 @@ sub test_scalar2scalar {
     note("Testing scalar2scalar\n");
 
     my $tidyresult = Perl::Tidy::perltidy(
-        argv        => '-utf8 -eos',
+        argv        => '-utf8 -eos -npro',
         source      => \$source,
         destination => \$destination
     );
@@ -94,7 +94,7 @@ sub test_scalararray2scalararray {
     note("Testing scalararray2scalararray\n");
 
     my $tidyresult = Perl::Tidy::perltidy(
-        argv        => '-utf8 -eos',
+        argv        => '-utf8 -eos -npro',
         source      => $source,
         destination => $destination
     );