# Perltidy Change Log
-## 2024 05 11.06
+## 2024 05 11.07
+
+ - Include signature variables in --dump-unusual-variables and
+ --warn-variable-types; see git #158.
- Add logical xor operator ^^ available in perl version 5.40, as
noted in git #157.
=head1 VERSION
-This man page documents perltidy version 20240511.06
+This man page documents perltidy version 20240511.07
=head1 BUG REPORTS
# then the Release version must be bumped, and it is probably past time for
# a release anyway.
- $VERSION = '20240511.06';
+ $VERSION = '20240511.07';
} ## end BEGIN
sub DESTROY {
$add_option->( 'delete-weld-interfering-commas', 'dwic', '!' );
$add_option->( 'delete-semicolons', 'dsm', '!' );
$add_option->( 'function-paren-vertical-alignment', 'fpva', '!' );
- $add_option->( 'iterate-trailing-commas', 'itc', '!' );
+ $add_option->( 'delay-trailing-comma-operations', 'dtco', '!' );
$add_option->( 'keyword-paren-inner-tightness', 'kpit', '=i' );
$add_option->( 'keyword-paren-inner-tightness-list', 'kpitl', '=s' );
$add_option->( 'logical-padding', 'lop', '!' );
indent-columns=4
integer-range-check=2
interbracket-arrow-complexity=1
- iterate-trailing-commas
+ delay-trailing-comma-operations
iterations=1
keep-old-blank-lines=1
keyword-paren-inner-tightness=1
=head1 VERSION
-This man page documents Perl::Tidy version 20240511.06
+This man page documents Perl::Tidy version 20240511.07
=head1 LICENSE
use strict;
use warnings;
use English qw( -no_match_vars );
-our $VERSION = '20240511.06';
+our $VERSION = '20240511.07';
use constant EMPTY_STRING => q{};
use constant SPACE => q{ };
use strict;
use warnings;
use English qw( -no_match_vars );
-our $VERSION = '20240511.06';
+our $VERSION = '20240511.07';
use constant EMPTY_STRING => q{};
package Perl::Tidy::FileWriter;
use strict;
use warnings;
-our $VERSION = '20240511.06';
+our $VERSION = '20240511.07';
use constant DEVEL_MODE => 0;
use constant EMPTY_STRING => 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 = '20240511.06';
+our $VERSION = '20240511.07';
# The Tokenizer will be loaded with the Formatter
##use Perl::Tidy::Tokenizer; # for is_keyword()
# $package = what package was in effect when it was defined
# $KK = token index (for sorting)
- # Variables for a batch of lexical varis being collected:
+ # Variables for a batch of lexical vars being collected:
my $my_keyword; # 'state' or 'my' keyword for this set
my $K_end_my = -1; # max token index of this set
my $in_signature_seqno = 0; # true while scanning a signature
# commas, but not both. See git #156
# permission must be given
- return if ( !$rOpts->{'iterate-trailing-commas'} );
+ return if ( !$rOpts->{'delay-trailing-comma-operations'} );
# we must be at the first of multiple iterations
my $it = Perl::Tidy::get_iteration_count();
package Perl::Tidy::HtmlWriter;
use strict;
use warnings;
-our $VERSION = '20240511.06';
+our $VERSION = '20240511.07';
use Carp;
use English qw( -no_match_vars );
use strict;
use warnings;
use Carp;
-our $VERSION = '20240511.06';
+our $VERSION = '20240511.07';
use constant DEVEL_MODE => 0;
use constant EMPTY_STRING => q{};
use strict;
use warnings;
use Carp;
-our $VERSION = '20240511.06';
+our $VERSION = '20240511.07';
use constant DEVEL_MODE => 0;
use strict;
use warnings;
-our $VERSION = '20240511.06';
+our $VERSION = '20240511.07';
BEGIN {
package Perl::Tidy::Logger;
use strict;
use warnings;
-our $VERSION = '20240511.06';
+our $VERSION = '20240511.07';
use Carp;
use English qw( -no_match_vars );
use warnings;
use English qw( -no_match_vars );
-our $VERSION = '20240511.06';
+our $VERSION = '20240511.07';
use Carp;
{ #<<< A non-indenting brace to contain all lexical variables
-our $VERSION = '20240511.06';
+our $VERSION = '20240511.07';
use English qw( -no_match_vars );
use Scalar::Util 'refaddr';
use Perl::Tidy::VerticalAligner::Alignment;
use strict;
use warnings;
-our $VERSION = '20240511.06';
+our $VERSION = '20240511.07';
sub new {
my ( $class, $rarg ) = @_;
use strict;
use warnings;
-our $VERSION = '20240511.06';
+our $VERSION = '20240511.07';
use English qw( -no_match_vars );
sub AUTOLOAD {