Got rid of duplicated test source samples

#1674

plugin/test/base/PerlLightTestCaseBase.java

@@ -944,8 +944,18 @@ protected void doTestBackspaceWithoutFiles(@NotNull String initialText, @NotNull
     myFixture.checkResult(expected);
   }
 
+
+  protected void doTestEnter(@NotNull String fileName) {
+    initWithFileSmart(fileName);
+    doTestEnterNoInit();
+  }
+
   protected void doTestEnter() {
     initWithFileSmart();
+    doTestEnterNoInit();
+  }
+
+  protected void doTestEnterNoInit() {
     myFixture.type('\n');
     UsefulTestCase.assertSameLinesWithFile(getTestResultsFilePath(), getEditorTextWithCaretsAndSelections());
   }

plugin/test/formatter/PerlSubsFormatterEnterTest.java

@@ -46,61 +46,61 @@ public void testSignatureElementDefaultValueAfterAssign() {
   @Test
   public void testSignatureElementDefaultValueSecond() {
     getCustomSettings().ALIGN_CONSECUTIVE_ASSIGNMENTS = NO_ALIGN;
-    doTest();
+    doTest("signatureElementDefaultValueSecond");
   }
 
   @Test
   public void testSignatureElementDefaultValueSecondAligned() {
     getCustomSettings().ALIGN_CONSECUTIVE_ASSIGNMENTS = ALIGN_LINES;
-    doTest();
+    doTest("signatureElementDefaultValueSecond");
   }
 
   @Test
   public void testSignatureElementDefaultValueSecondAlignedStatement() {
     getCustomSettings().ALIGN_CONSECUTIVE_ASSIGNMENTS = ALIGN_IN_STATEMENT;
-    doTest();
+    doTest("signatureElementDefaultValueSecond");
   }
 
   @Test
   public void testSignatureElementDefaultValueMiddle() {
     getCustomSettings().ALIGN_CONSECUTIVE_ASSIGNMENTS = NO_ALIGN;
-    doTest();
+    doTest("signatureElementDefaultValueMiddle");
   }
 
   @Test
   public void testSignatureElementDefaultValueMiddleAligned() {
     getCustomSettings().ALIGN_CONSECUTIVE_ASSIGNMENTS = ALIGN_LINES;
-    doTest();
+    doTest("signatureElementDefaultValueMiddle");
   }
 
   @Test
   public void testSignatureElementDefaultValueMiddleAlignedStatement() {
     getCustomSettings().ALIGN_CONSECUTIVE_ASSIGNMENTS = ALIGN_IN_STATEMENT;
-    doTest();
+    doTest("signatureElementDefaultValueMiddle");
   }
 
   @Test
   public void testAttributeSecond() {
     getCustomSettings().ALIGN_ATTRIBUTES = false;
-    doTest();
+    doTest("attributeSecond");
   }
 
   @Test
   public void testAttributeSecondAligned() {
     getCustomSettings().ALIGN_ATTRIBUTES = true;
-    doTest();
+    doTest("attributeSecond");
   }
 
   @Test
   public void testAttributeMiddle() {
     getCustomSettings().ALIGN_ATTRIBUTES = false;
-    doTest();
+    doTest("attributeMiddle");
   }
 
   @Test
   public void testAttributeMiddleAligned() {
     getCustomSettings().ALIGN_ATTRIBUTES = true;
-    doTest();
+    doTest("attributeMiddle");
   }
 
   @Test
@@ -121,25 +121,25 @@ public void testSignatureAfterCommaMiddle() {
   @Test
   public void testSignatureAfterCommaContinuation() {
     getSettings().ALIGN_MULTILINE_PARAMETERS = false;
-    doTest();
+    doTest("signatureAfterCommaContinuation");
   }
 
   @Test
   public void testSignatureAfterCommaContinuationAligned() {
     getSettings().ALIGN_MULTILINE_PARAMETERS = true;
-    doTest();
+    doTest("signatureAfterCommaContinuation");
   }
 
   @Test
   public void testSignatureAfterCommaContinuationMiddle() {
     getSettings().ALIGN_MULTILINE_PARAMETERS = false;
-    doTest();
+    doTest("signatureAfterCommaContinuationMiddle");
   }
 
   @Test
   public void testSignatureAfterCommaContinuationMiddleAligned() {
     getSettings().ALIGN_MULTILINE_PARAMETERS = true;
-    doTest();
+    doTest("signatureAfterCommaContinuationMiddle");
   }
 
   @NotNull
@@ -160,6 +160,10 @@ protected void doTest() {
     doTestEnter();
   }
 
+  protected void doTest(@NotNull String fileName) {
+    doTestEnter(fileName);
+  }
+
   public static class After extends PerlSubsFormatterEnterTest {
     @NotNull
     @Override

plugin/testData/formatter/perl/enter/subs/answers/signatureAfterCommaContinuationMiddleAligned.after.pl.txt

@@ -1,5 +1,5 @@
 after somemethod( $var,
                   <caret>
-                 $othervar
+    $othervar
 ) {
 };

plugin/testData/formatter/perl/enter/subs/answers/signatureAfterCommaContinuationMiddleAligned.around.pl.txt

@@ -1,5 +1,5 @@
 around somemethod( $var,
                    <caret>
-                 $othervar
+    $othervar
 ) {
 };

plugin/testData/formatter/perl/enter/subs/answers/signatureAfterCommaContinuationMiddleAligned.augment.pl.txt

@@ -1,5 +1,5 @@
 augment somemethod( $var,
                     <caret>
-                 $othervar
+    $othervar
 ) {
 };

plugin/testData/formatter/perl/enter/subs/answers/signatureAfterCommaContinuationMiddleAligned.before.pl.txt

@@ -1,5 +1,5 @@
 before somemethod( $var,
                    <caret>
-                 $othervar
+    $othervar
 ) {
 };

plugin/testData/formatter/perl/enter/subs/answers/signatureAfterCommaContinuationMiddleAligned.fun.pl.txt

@@ -1,5 +1,5 @@
 fun somefun( $var,
              <caret>
-                 $othervar
+    $othervar
 ) {
 };

plugin/testData/formatter/perl/enter/subs/answers/signatureAfterCommaContinuationMiddleAligned.funExpr.pl.txt

@@ -1,5 +1,5 @@
 fun( $var,
      <caret>
-                 $othervar
+    $othervar
 ) {
 };

plugin/testData/formatter/perl/enter/subs/answers/signatureAfterCommaContinuationMiddleAligned.func.pl.txt

@@ -1,5 +1,5 @@
 func somefunc( $var,
                <caret>
-                 $othervar
+    $othervar
 ) {
 };

plugin/testData/formatter/perl/enter/subs/answers/signatureAfterCommaContinuationMiddleAligned.method.pl.txt

@@ -1,5 +1,5 @@
 method somemethod( $var,
                    <caret>
-                 $othervar
+    $othervar
 ) {
 };

plugin/testData/formatter/perl/enter/subs/answers/signatureAfterCommaContinuationMiddleAligned.methodExpr.pl.txt

@@ -1,5 +1,5 @@
 method( $var,
         <caret>
-                 $othervar
+    $othervar
 ) {
 };

plugin/testData/formatter/perl/enter/subs/answers/signatureAfterCommaContinuationMiddleAligned.override.pl.txt

@@ -1,5 +1,5 @@
 override somemethod( $var,
                      <caret>
-                 $othervar
+    $othervar
 ) {
 };

plugin/testData/formatter/perl/enter/subs/answers/signatureAfterCommaContinuationMiddleAligned.sub.pl.txt

@@ -1,5 +1,5 @@
 sub somesub( $var,
              <caret>
-                 $othervar
+    $othervar
 ) {
 };

plugin/testData/formatter/perl/enter/subs/answers/signatureAfterCommaContinuationMiddleAligned.subExpr.pl.txt

@@ -1,5 +1,5 @@
 sub( $var,
      <caret>
-                 $othervar
+    $othervar
 ) {
 };