From: Steve Hancock <perltidy@users.sourceforge.net>
Date: Mon, 23 Aug 2021 14:09:12 +0000 (-0700)
Subject: add git #51 to test cases
X-Git-Tag: 20210717.02~28
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=7a8da7a2d23f0922b9a7b6b2062a21efe904936f;p=perltidy.git

add git #51 to test cases
---

diff --git a/t/snippets/expect/git51.def b/t/snippets/expect/git51.def
new file mode 100644
index 00000000..cb9a77b1
--- /dev/null
+++ b/t/snippets/expect/git51.def
@@ -0,0 +1,7 @@
+Type::Libraries->setup_class(
+    __PACKAGE__,
+    qw(
+      Types::Standard
+      Types::Common::Numeric
+    ),    # <--- brace here
+);
diff --git a/t/snippets/expect/git51.git51 b/t/snippets/expect/git51.git51
new file mode 100644
index 00000000..eaf41613
--- /dev/null
+++ b/t/snippets/expect/git51.git51
@@ -0,0 +1,7 @@
+Type::Libraries->setup_class(
+	__PACKAGE__,
+	qw(
+		Types::Standard
+		Types::Common::Numeric
+	),    # <--- brace here
+);
diff --git a/t/snippets/git51.in b/t/snippets/git51.in
new file mode 100644
index 00000000..9ad34ba1
--- /dev/null
+++ b/t/snippets/git51.in
@@ -0,0 +1,7 @@
+Type::Libraries->setup_class(
+	__PACKAGE__,
+	qw(
+		Types::Standard
+		Types::Common::Numeric
+		), # <--- brace here
+);
diff --git a/t/snippets/git51.par b/t/snippets/git51.par
new file mode 100644
index 00000000..539b3e63
--- /dev/null
+++ b/t/snippets/git51.par
@@ -0,0 +1,18 @@
+--maximum-line-length=120
+--converge
+--tabs
+--entab-leading-whitespace=4
+--continuation-indentation=4
+--extended-continuation-indentation
+--no-delete-old-newlines
+--no-outdent-long-lines
+--no-outdent-labels
+--novalign
+--no-logical-padding
+--opening-sub-brace-on-new-line
+--square-bracket-tightness=2
+--paren-tightness=2
+--brace-tightness=2
+--opening-token-right
+
+-sal='first any sum sum0 reduce'
diff --git a/t/snippets/packing_list.txt b/t/snippets/packing_list.txt
index d44b8b45..5ea6f4e1 100644
--- a/t/snippets/packing_list.txt
+++ b/t/snippets/packing_list.txt
@@ -464,3 +464,5 @@
 ../snippets9.t	rt98902.def
 ../snippets9.t	rt98902.rt98902
 ../snippets9.t	rt99961.def
+../snippets24.t	git51.def
+../snippets24.t	git51.git51
diff --git a/t/snippets24.t b/t/snippets24.t
index aa02151e..92aa7089 100644
--- a/t/snippets24.t
+++ b/t/snippets24.t
@@ -17,6 +17,8 @@
 #14 rt136417.rt136417
 #15 numbers.def
 #16 code_skipping.def
+#17 git51.def
+#18 git51.git51
 
 # To locate test #13 you can search for its name or the string '#13'
 
@@ -37,6 +39,26 @@ BEGIN {
         'def'   => "",
         'fpva1' => "-sfp",
         'fpva2' => "-sfp -nfpva",
+        'git51' => <<'----------',
+--maximum-line-length=120
+--converge
+--tabs
+--entab-leading-whitespace=4
+--continuation-indentation=4
+--extended-continuation-indentation
+--no-delete-old-newlines
+--no-outdent-long-lines
+--no-outdent-labels
+--novalign
+--no-logical-padding
+--opening-sub-brace-on-new-line
+--square-bracket-tightness=2
+--paren-tightness=2
+--brace-tightness=2
+--opening-token-right
+
+-sal='first any sum sum0 reduce'
+----------
         'git54' => "-bbp=3 -bbpi=2 -ci=4 -lp",
         'lpxl1' => "-lp",
         'lpxl3' => <<'----------',
@@ -96,6 +118,16 @@ Coro::AnyEvent::sleep( 3, 4 );
 use Carp ();
 use File::Spec ();
 use File::Path ();
+----------
+
+        'git51' => <<'----------',
+Type::Libraries->setup_class(
+	__PACKAGE__,
+	qw(
+		Types::Standard
+		Types::Common::Numeric
+		), # <--- brace here
+);
 ----------
 
         'git54' => <<'----------',
@@ -864,6 +896,34 @@ my $self    = shift;
 my $cloning = shift;
 #16...........
         },
+
+        'git51.def' => {
+            source => "git51",
+            params => "def",
+            expect => <<'#17...........',
+Type::Libraries->setup_class(
+    __PACKAGE__,
+    qw(
+      Types::Standard
+      Types::Common::Numeric
+    ),    # <--- brace here
+);
+#17...........
+        },
+
+        'git51.git51' => {
+            source => "git51",
+            params => "git51",
+            expect => <<'#18...........',
+Type::Libraries->setup_class(
+	__PACKAGE__,
+	qw(
+		Types::Standard
+		Types::Common::Numeric
+	),    # <--- brace here
+);
+#18...........
+        },
     };
 
     my $ntests = 0 + keys %{$rtests};