From b0e2f748450e1ff66a6cf23b5308259d82e4abdf Mon Sep 17 00:00:00 2001 From: Steve Hancock Date: Sun, 3 Nov 2024 06:20:47 -0800 Subject: [PATCH] bump to version 20240903.05 --- CHANGES.md | 11 +- bin/perltidy | 36 +++--- docs/ChangeLog.html | 12 +- docs/Tidy.html | 2 +- docs/perltidy.html | 125 ++++++++++++++++++--- lib/Perl/Tidy.pm | 2 +- lib/Perl/Tidy.pod | 2 +- lib/Perl/Tidy/Debugger.pm | 2 +- lib/Perl/Tidy/Diagnostics.pm | 2 +- lib/Perl/Tidy/FileWriter.pm | 2 +- lib/Perl/Tidy/Formatter.pm | 2 +- lib/Perl/Tidy/HtmlWriter.pm | 2 +- lib/Perl/Tidy/IOScalar.pm | 2 +- lib/Perl/Tidy/IOScalarArray.pm | 2 +- lib/Perl/Tidy/IndentationItem.pm | 2 +- lib/Perl/Tidy/Logger.pm | 2 +- lib/Perl/Tidy/Tokenizer.pm | 2 +- lib/Perl/Tidy/VerticalAligner.pm | 2 +- lib/Perl/Tidy/VerticalAligner/Alignment.pm | 2 +- lib/Perl/Tidy/VerticalAligner/Line.pm | 2 +- 20 files changed, 160 insertions(+), 56 deletions(-) diff --git a/CHANGES.md b/CHANGES.md index 60af8af2..07f07f18 100644 --- a/CHANGES.md +++ b/CHANGES.md @@ -1,13 +1,14 @@ # Perltidy Change Log -## 2024 09 03.04 +## 2024 09 03.05 - Added parameter --break-at-trailing-comma-types=s, or -btct=s, where - s is a string which selectes trailing commas. For example, -btct='f(b' - places a line break after all bare trailing commas in function calls. - The manual has details. + s is a string which selects trailing commas. For example, -btct='f(b' + places a line break after all bare trailing commas in function calls. + The manual has details. - - Fix git #165, strings beginning with v before => gave incorrect error message + - Fix git #165, strings beginning with v before => gave an incorrect error + message. - The parameter --add-lone-trailing-commas, -altc, is now on by default. This will simplify input for trailing comma operations. Use diff --git a/bin/perltidy b/bin/perltidy index d3dd954a..2f52d729 100755 --- a/bin/perltidy +++ b/bin/perltidy @@ -3732,8 +3732,8 @@ tables in the file must already be nicely formatted. =item B<-btct=s>, B<--break-at-trailing-comma-types=s> -A trailing comma is an optional comma following the last item of a list. -The B<-btct=s> tells perltidy to end a line at selected B. +A B is an optional comma following the last item of a list. +The B<-btct=s> tells perltidy to end a line at selected trailing commas. The string B selects the trailing commas, as follows: s=1 or '*' : every trailing comma @@ -3770,18 +3770,17 @@ we can break it open with '' => xx, ); -Afterwards, we could switch to B since the trailing comma is -now bare. But the B<-btct> parameter must be retained in this case because -otherwise perltidy will by default flatten this small list. +Afterwards, we could switch to B since the trailing comma is now bare. +But the B<-btct> parameter must be retained in this case because otherwise this +small list will be flattened the next time it is formatted. -It is possible restrict the application of this logic to specific container -types by including an opening token ahead of the letter in the above table. -For example +This logic can be restricted to specific container types by including an +opening token ahead of the letter in the above table. For example -btct='(b' -means that this operation should only apply to lists within parens with -trailing commas. +means that this operation should only apply to bare trailing commas within +parentheses. For parentheses, an additional item of information which can be given is an alphanumeric letter which is used to limit the selection further depending on @@ -3805,8 +3804,9 @@ means that bare trailing commas in function call lists in the input stream should be followed by line breaks in the formatted output stream. The section L<"Adding and Deleting Commas"> describes additional controls for -working with trailing commas, and which can be combined with the -B<-break-trailing-comma-types> parameter to control list formatting. +working with trailing commas. These can be combined with the +B<-break-trailing-comma-types> parameter for additional control of list +formatting. =item B<-mft=n>, B<--maximum-fields-per-table=n> @@ -4156,8 +4156,8 @@ whether or not a list is multiline or bare is made based on the B stream if only one iteration is made, which is the default. When iterations are requested with the B<--converge> parameter, any comma -addition or deletion operations are postponed until the start of the -B, after most changes in line breaks have been made. +deletion operations are postponed until the start of the B, +after most changes in line breaks have been made. To illustrate, if we start with @@ -4212,7 +4212,9 @@ given the following input text 'g', Canvas => $overview_canvas ); -we can add a trailing comma, and keep the container open, with +formatting with C<-wtc=f(b) -atc> will not add a trailing comma because the +list will be flattend and the comma will not remain bare. But we can add a +trailing comma, and keep the container open, with # perltidy -wtc='f(b' -atc -btct='f(b' plot( @@ -4230,7 +4232,7 @@ we can add a trailing comma and break the container open with 'g', Canvas => $overview_canvas, ); -After that, we could use C<-btct='f(b'> to keep the container open +After that, we could use C<-btct='f(b'> to keep the container open. =item * @@ -7198,7 +7200,7 @@ The perltidy binary uses the Perl::Tidy module and is installed when that module =head1 VERSION -This man page documents perltidy version 20240903.04 +This man page documents perltidy version 20240903.05 =head1 BUG REPORTS diff --git a/docs/ChangeLog.html b/docs/ChangeLog.html index ce550c2a..789b5fea 100644 --- a/docs/ChangeLog.html +++ b/docs/ChangeLog.html @@ -1,8 +1,16 @@

Perltidy Change Log

-

2024 09 03.03

+

2024 09 03.05

-
- The parameter --add-lone-trailing-commas, -altc, is now on by default.
+
- Added parameter --break-at-trailing-comma-types=s, or -btct=s, where
+s is a string which selects trailing commas.  For example, -btct='f(b'
+places a line break after all bare trailing commas in function calls.
+The manual has details.
+
+- Fix git #165, strings beginning with v before => gave an incorrect error
+message.
+
+- The parameter --add-lone-trailing-commas, -altc, is now on by default.
 This will simplify input for trailing comma operations. Use
 --noadd-lone-trailing-commas, or -naltc to turn it off.
 
diff --git a/docs/Tidy.html b/docs/Tidy.html
index d1b3df75..64303852 100644
--- a/docs/Tidy.html
+++ b/docs/Tidy.html
@@ -399,7 +399,7 @@
 
 

VERSION

-

This man page documents Perl::Tidy version 20240903.03

+

This man page documents Perl::Tidy version 20240903.05

LICENSE

diff --git a/docs/perltidy.html b/docs/perltidy.html index 10292c86..ac58ef6e 100644 --- a/docs/perltidy.html +++ b/docs/perltidy.html @@ -1105,7 +1105,7 @@
-dws, --delete-old-whitespace
-

Setting this option allows perltidy to remove some old whitespace between characters, if necessary. This is the default. If you do not want any old whitespace removed, use -ndws or --nodelete-old-whitespace.

+

Setting this option allows perltidy to remove optional whitespace between characters in the input file. The default is to not to do this (-nodelete-old-whitespace). This parameter has little effect by itself. But in combination with --noadd-whitespace it will cause most of the whitespace in a file to be removed.

Detailed whitespace controls around tokens
@@ -2955,6 +2955,68 @@

A disadvantage of this flag compared to the methods discussed above is that all tables in the file must already be nicely formatted.

+ +
-btct=s, --break-at-trailing-comma-types=s
+
+ +

A trailing comma is an optional comma following the last item of a list. The -btct=s tells perltidy to end a line at selected trailing commas. The string s selects the trailing commas, as follows:

+ +
  s=1 or '*' : every trailing comma
+  s=m a trailing comma in a multiline list
+  s=b a bare trailing comma
+  s=0 none
+ +

For example, given the following input

+ +
        $w->bind(
+            '<Page_Down>' => xx,
+        );
+ +

The default formatting would flatten this into a single line. But the container can be kept open with

+ +
        # perltidy -btct='b'
+        $w->bind(
+            '<Page_Down>' => xx,
+        );
+ +

This can be particularly useful for short function calls like this, where the default perltidy formatting does not keep the container open.

+ +

The options s=m and s=1 can be used to open up containers with non-bare trailing commas. For example, given this input

+ +
        $w->bind( '<Page_Down>' => xx, );
+ +

we can break it open with

+ +
        # perltidy -btct=1
+        $w->bind(
+            '<Page_Down>' => xx,
+        );
+ +

Afterwards, we could switch to btct=b since the trailing comma is now bare. But the -btct parameter must be retained in this case because otherwise this small list will be flattened the next time it is formatted.

+ +

This logic can be restricted to specific container types by including an opening token ahead of the letter in the above table. For example

+ +
    -btct='(b'
+ +

means that this operation should only apply to bare trailing commas within parentheses.

+ +

For parentheses, an additional item of information which can be given is an alphanumeric letter which is used to limit the selection further depending on the type of token immediately before the opening paren. The possible letters are currently 'k', 'K', 'f', 'F', 'w', and 'W', with these meanings for matching whatever precedes an opening paren:

+ +
 'k' matches if the previous nonblank token is a perl built-in keyword
+ 'K' matches if 'k' does not, meaning that the previous token is not a keyword.
+ 'f' matches if the previous token is a function other than a keyword.
+ 'F' matches if 'f' does not.
+ 'w' matches if either 'k' or 'f' match.
+ 'W' matches if 'w' does not.
+ +

These are the same codes used for --line-up-parentheses-inclusion-list. For example,

+ +
    -btct='f(b'
+ +

means that bare trailing commas in function call lists in the input stream should be followed by line breaks in the formatted output stream.

+ +

The section "Adding and Deleting Commas" describes additional controls for working with trailing commas. These can be combined with the -break-trailing-comma-types parameter for additional control of list formatting.

+
-mft=n, --maximum-fields-per-table=n
@@ -3046,7 +3108,7 @@
  • If the option --space-function-paren is employed, it is ignored for these special function calls because it would deactivate them.

  • -
  • Otherwise the various formatting control flags operate on these lists the same as for other comma-separated lists. In particular, note that if --break-at-old-comma-breakpoints, or -boc, is set, then the old line break locations will be retained.

    +
  • Otherwise the various formatting control flags operate on these lists the same as for other comma-separated lists. In particular, note that if --break-at-old-comma-breakpoints, or -boc, is set, then the old line break locations will be retained. And old line breaks will be retained if there are any blank lines between the opening and closing parens.

  • Before using this option for the first time, it is a good idea to scan the code and decide if any lists have a special order which should be retained. This can be accomplished for example by changing the quote delimiters to something other than parens, or by inserting a blank line as discussed at the start of this section.

    @@ -3140,6 +3202,13 @@
  • A bare trailing comma is a comma which is at the end of a line. That is, the closing container token follows on a different line. So a list with a bare trailing comma is a special case of a multiline list.

    +
  • +
  • In fact the above options for trailing commas can be seen as a hierarchy of nesting sets which can be expressed as

    + +
       1 > m > b > i > h > 0
    + +

    This indicates that multiline trailing commas m are a subset of all trailing commas, and bare trailing commas b are a subset of all multiline trailing commas, and so on.

    +
  • @@ -3200,7 +3269,7 @@
      -wtc='+h -b' -atc -dtc
    -

    means that missing trailing commas should be added to lists of key => values pairs, and trailing commas which are not bare should be removed. No other changes are made. When both plus and minus terms are used like this, they must not be in conflict. This can be shown to be equivalent to requiring that the letter of the plus term does not occur before the letter of the minus term in their hierarchical order m, b, i, h. In this example, the plus term h follows the minus term b in the list, so there is no conflict.

    +

    means that missing trailing commas should be added to lists of key => value pairs, and trailing commas which are not bare should be removed. No other changes are made. When both plus and minus terms are used like this, they must not be in conflict. There is no conflict in this example because the trailing comma locations of the key=>value pairs selected by the +h term are a subset of all bare trailing commas, and thus will not be deleted by the -b term. The general rule is that the letter of the plus term should occur after the letter of the minus term in the hierarchical nesting order, 1 > m > b > i > h > 0.

    Some points to note regarding adding and deleting trailing commas:

    @@ -3208,7 +3277,7 @@
  • It is recommended to also use the --converge parameter when adding and/or deleting trailing commas, especially if the formatter may be making other line break changes at the same time. The reason is that the decision regarding whether or not a list is multiline or bare is made based on the input stream if only one iteration is made, which is the default.

    -

    When iterations are requested with the --converge parameter, any comma addition or deletion operations are postponed until the start of the second iteration, after most changes in line breaks have been made.

    +

    When iterations are requested with the --converge parameter, any comma deletion operations are postponed until the start of the second iteration, after most changes in line breaks have been made.

    To illustrate, if we start with

    @@ -3224,7 +3293,7 @@ b => 2 );
  • -

    we delete a comma which has become bare, which is not what is wanted. This happened because the change was based on the starting rather than the final line breaks. Rerunning with --converge added fixes things

    +

    we delete a comma which has become bare, which is not what is wanted. This happened because the change was based on the starting rather than the final line breaks. Running with --converge gives the desired result:

            # perltidy -wtc=b -dtc --converge
             f(
    @@ -3232,22 +3301,41 @@
                 b => 2,
             );
    -

    because changes are based on the line breaks after the first iteration.

    +

    because comma changes are based on the line breaks after the first iteration.

    + +

    The additional computer time needed by the --converge option to do another iteration or two will not be noticeable except for files with many thousands of lines.

    A parameter --delay-trailing-comma-operations, or -dtco, is available to control this behavior if desired. Negating this parameter, with -ndtco, tells perltidy to always use the starting state to make decisions regarding comma addition and deletion, even when iterations are requested. This should not normally be necessary.

    -
  • Perltidy does not add a trailing comma to a list which appears to be near a stability limit. So if a comma is unexpectedly not added, this is probably the reason.

    +
  • Perltidy does not add a trailing comma in some edge cases which appear to be near a stability limit. So if a comma is unexpectedly not added, this is probably the reason.

    -

    This issue can be illustrated with the following example. The closing brace is at column 80, the default line length:

    +
  • +
  • If the parameter --break-at-trailing-comma-types is also employed, it operates on the state after any adding or deleting of commas. And it will allow trailing commas to be added in most edge cases. For example, given the following input text

    -
        # perltidy -atc -dtc -wtc=b
    -    $menuitem_paste->signal_connect( 'activate' => sub { create_paste_window() }
    +
        plot(
    +        'g', Canvas => $overview_canvas
         );
    -

    Adding a trailing comma would cause the maximum line length to be exceeded. This in turn would cause a different break point to occur for which the comma is no longer bare. So it would get deleted on the next formatting pass, returning things to the starting state. This is is an unstable situation.

    +

    formatting with -wtc=f(b) -atc will not add a trailing comma because the list will be flattend and the comma will not remain bare. But we can add a trailing comma, and keep the container open, with

    + +
        # perltidy -wtc='f(b' -atc -btct='f(b'
    +    plot(
    +        'g', Canvas => $overview_canvas,
    +    );
    + +

    As another example, given the same text on a single line without a trailing comma

    + +
        plot( 'g', Canvas => $overview_canvas );
    -

    The rules used to detect and avoid instability work well but are not precise, so in some cases where perltidy will not add a comma, it may be possible to add a stable trailing comma with editing. For example, if the above example were run with -l=81 -atc -wtc=b, perltidy would still not add a trailing comma, even though it would be stable.

    +

    we can add a trailing comma and break the container open with

    + +
        # perltidy -wtc=1 -atc -btct=1
    +    plot(
    +        'g', Canvas => $overview_canvas,
    +    );
    + +

    After that, we could use -btct='f(b' to keep the container open.

  • When using these parameters for the first time it is a good idea to practice on some test scripts and verify that the results are as expected.

    @@ -4583,7 +4671,7 @@

    The parameters in the .perltidyrc file are installed first, so any parameters given on the command line will have priority over them.

    -

    To avoid confusion, perltidy ignores any command in the .perltidyrc file which would cause some kind of dump and an exit. These are:

    +

    To avoid confusion, perltidy ignores any command in the .perltidyrc file which would cause some kind of dump and an exit. These include:

     -h -v -ddf -dln -dop -dsn -dtt -dwls -dwrs -ss
    @@ -4599,7 +4687,7 @@
  • It may be simplest to develop and test configuration files with alternative names, and invoke them with -pro=filename on the command line. Then rename the desired file to .perltidyrc when finished.

  • -
  • The parameters in the .perltidyrc file can be switched off with the -npro option.

    +
  • The parameters in the .perltidyrc file can be switched off with the -npro option on the command line.

  • Any parameter in the .perltidyrc file can be overridden with a replacement value on the command line. This is because the command line is processed after the .perltidyrc file.

    @@ -4829,10 +4917,15 @@
        perltidy -dbs -dbl=1 -dbt='* closure' somefile.pl >blocks.csv
  • -
  • This selects every if-chain which contains 2 or more elsif blocks:

    +
  • This selects every if-chain which contains 2 or more elsif blocks:

        perltidy -dbs -dbl=1 -dbt='elsif2' somefile.pl >blocks.csv
    +
  • +
  • This selects every while block with 6 or more code lines

    + +
        perltidy -dbs -dbt=while -dbl=6 somfile.pl >while.csv
    +
  • @@ -5515,7 +5608,7 @@

    VERSION

    -

    This man page documents perltidy version 20240903.03

    +

    This man page documents perltidy version 20240903.05

    BUG REPORTS

    diff --git a/lib/Perl/Tidy.pm b/lib/Perl/Tidy.pm index 9850c50a..c99affd4 100644 --- a/lib/Perl/Tidy.pm +++ b/lib/Perl/Tidy.pm @@ -135,7 +135,7 @@ BEGIN { # then the Release version must be bumped, and it is probably past time for # a release anyway. - $VERSION = '20240903.04'; + $VERSION = '20240903.05'; } ## end BEGIN sub DESTROY { diff --git a/lib/Perl/Tidy.pod b/lib/Perl/Tidy.pod index 91c21173..233e3538 100644 --- a/lib/Perl/Tidy.pod +++ b/lib/Perl/Tidy.pod @@ -469,7 +469,7 @@ The module 'Perl::Tidy' comes with a binary 'perltidy' which is installed when t =head1 VERSION -This man page documents Perl::Tidy version 20240903.04 +This man page documents Perl::Tidy version 20240903.05 =head1 LICENSE diff --git a/lib/Perl/Tidy/Debugger.pm b/lib/Perl/Tidy/Debugger.pm index c0f9a749..ab59a8bc 100644 --- a/lib/Perl/Tidy/Debugger.pm +++ b/lib/Perl/Tidy/Debugger.pm @@ -8,7 +8,7 @@ package Perl::Tidy::Debugger; use strict; use warnings; use English qw( -no_match_vars ); -our $VERSION = '20240903.04'; +our $VERSION = '20240903.05'; use constant EMPTY_STRING => q{}; use constant SPACE => q{ }; diff --git a/lib/Perl/Tidy/Diagnostics.pm b/lib/Perl/Tidy/Diagnostics.pm index 404f6def..fea86068 100644 --- a/lib/Perl/Tidy/Diagnostics.pm +++ b/lib/Perl/Tidy/Diagnostics.pm @@ -18,7 +18,7 @@ package Perl::Tidy::Diagnostics; use strict; use warnings; use English qw( -no_match_vars ); -our $VERSION = '20240903.04'; +our $VERSION = '20240903.05'; use constant EMPTY_STRING => q{}; diff --git a/lib/Perl/Tidy/FileWriter.pm b/lib/Perl/Tidy/FileWriter.pm index 8ee4be9d..7bb87dc7 100644 --- a/lib/Perl/Tidy/FileWriter.pm +++ b/lib/Perl/Tidy/FileWriter.pm @@ -16,7 +16,7 @@ package Perl::Tidy::FileWriter; use strict; use warnings; -our $VERSION = '20240903.04'; +our $VERSION = '20240903.05'; use constant DEVEL_MODE => 0; use constant EMPTY_STRING => q{}; diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm index faeff391..a20d477a 100644 --- a/lib/Perl/Tidy/Formatter.pm +++ b/lib/Perl/Tidy/Formatter.pm @@ -76,7 +76,7 @@ use constant BACKSLASH => q{\\}; use Carp; use English qw( -no_match_vars ); use List::Util qw( min max first ); # min, max first are in Perl 5.8 -our $VERSION = '20240903.04'; +our $VERSION = '20240903.05'; # The Tokenizer will be loaded with the Formatter ##use Perl::Tidy::Tokenizer; # for is_keyword() diff --git a/lib/Perl/Tidy/HtmlWriter.pm b/lib/Perl/Tidy/HtmlWriter.pm index 8d5509ab..e0a113e0 100644 --- a/lib/Perl/Tidy/HtmlWriter.pm +++ b/lib/Perl/Tidy/HtmlWriter.pm @@ -7,7 +7,7 @@ package Perl::Tidy::HtmlWriter; use strict; use warnings; -our $VERSION = '20240903.04'; +our $VERSION = '20240903.05'; use Carp; use English qw( -no_match_vars ); diff --git a/lib/Perl/Tidy/IOScalar.pm b/lib/Perl/Tidy/IOScalar.pm index 70bd560f..81d22070 100644 --- a/lib/Perl/Tidy/IOScalar.pm +++ b/lib/Perl/Tidy/IOScalar.pm @@ -10,7 +10,7 @@ package Perl::Tidy::IOScalar; use strict; use warnings; use Carp; -our $VERSION = '20240903.04'; +our $VERSION = '20240903.05'; use constant DEVEL_MODE => 0; use constant EMPTY_STRING => q{}; diff --git a/lib/Perl/Tidy/IOScalarArray.pm b/lib/Perl/Tidy/IOScalarArray.pm index d91357e4..68393186 100644 --- a/lib/Perl/Tidy/IOScalarArray.pm +++ b/lib/Perl/Tidy/IOScalarArray.pm @@ -14,7 +14,7 @@ package Perl::Tidy::IOScalarArray; use strict; use warnings; use Carp; -our $VERSION = '20240903.04'; +our $VERSION = '20240903.05'; use constant DEVEL_MODE => 0; diff --git a/lib/Perl/Tidy/IndentationItem.pm b/lib/Perl/Tidy/IndentationItem.pm index a7d37d58..6a4d97a5 100644 --- a/lib/Perl/Tidy/IndentationItem.pm +++ b/lib/Perl/Tidy/IndentationItem.pm @@ -9,7 +9,7 @@ package Perl::Tidy::IndentationItem; use strict; use warnings; -our $VERSION = '20240903.04'; +our $VERSION = '20240903.05'; BEGIN { diff --git a/lib/Perl/Tidy/Logger.pm b/lib/Perl/Tidy/Logger.pm index 20deef5b..3de6eaed 100644 --- a/lib/Perl/Tidy/Logger.pm +++ b/lib/Perl/Tidy/Logger.pm @@ -8,7 +8,7 @@ package Perl::Tidy::Logger; use strict; use warnings; -our $VERSION = '20240903.04'; +our $VERSION = '20240903.05'; use Carp; use English qw( -no_match_vars ); diff --git a/lib/Perl/Tidy/Tokenizer.pm b/lib/Perl/Tidy/Tokenizer.pm index bb17ddae..9b779689 100644 --- a/lib/Perl/Tidy/Tokenizer.pm +++ b/lib/Perl/Tidy/Tokenizer.pm @@ -33,7 +33,7 @@ use strict; use warnings; use English qw( -no_match_vars ); -our $VERSION = '20240903.04'; +our $VERSION = '20240903.05'; use Carp; diff --git a/lib/Perl/Tidy/VerticalAligner.pm b/lib/Perl/Tidy/VerticalAligner.pm index d15380d0..d2af820d 100644 --- a/lib/Perl/Tidy/VerticalAligner.pm +++ b/lib/Perl/Tidy/VerticalAligner.pm @@ -5,7 +5,7 @@ use Carp; { #<<< A non-indenting brace to contain all lexical variables -our $VERSION = '20240903.04'; +our $VERSION = '20240903.05'; use English qw( -no_match_vars ); use Scalar::Util 'refaddr'; # perl 5.8.1 and later use Perl::Tidy::VerticalAligner::Alignment; diff --git a/lib/Perl/Tidy/VerticalAligner/Alignment.pm b/lib/Perl/Tidy/VerticalAligner/Alignment.pm index a64ec43e..019698f4 100644 --- a/lib/Perl/Tidy/VerticalAligner/Alignment.pm +++ b/lib/Perl/Tidy/VerticalAligner/Alignment.pm @@ -9,7 +9,7 @@ package Perl::Tidy::VerticalAligner::Alignment; use strict; use warnings; -our $VERSION = '20240903.04'; +our $VERSION = '20240903.05'; sub new { my ( $class, $rarg ) = @_; diff --git a/lib/Perl/Tidy/VerticalAligner/Line.pm b/lib/Perl/Tidy/VerticalAligner/Line.pm index 7a0e4a68..633694d9 100644 --- a/lib/Perl/Tidy/VerticalAligner/Line.pm +++ b/lib/Perl/Tidy/VerticalAligner/Line.pm @@ -10,7 +10,7 @@ package Perl::Tidy::VerticalAligner::Line; use strict; use warnings; -our $VERSION = '20240903.04'; +our $VERSION = '20240903.05'; use English qw( -no_match_vars ); sub AUTOLOAD { -- 2.39.5