# Perltidy Change Log
-## 2020 10 01.02
+## 2020 10 01.03
+
+ - Fixed issue git #44, -vtc=n flag was ignored when -wn was set.
- implement request RT #133649, delete-old-newlines selectively. Two parameters,
one tab character.
The value of the integer B<n> can be any value but can be coordinated with the
-number of spaces used for intentation. For example, -et=4 -ci=4 -i=4 will
+number of spaces used for intentation. For example, B<-et=4 -ci=4 -i=4> will
produce one tab for each indentation level and and one for each continuation
indentation level. You may want to coordinate the value of B<n> with what your
display software assumes for the spacing of a tab.
=head1 VERSION
-This man page documents perltidy version 20201001.02
+This man page documents perltidy version 20201001.03
=head1 BUG REPORTS
<dl>
+<dt id="fix-issue-git-45--wn-and--vtc-n-now-work-together"><b>fix issue git #45, -wn and -vtc=n now work together</b></dt>
+<dd>
+
+<p>When -wn was set, the -vtc=n flag was being ignored. This was a simple fix made 5 Nov 2020 in 'fix issue git #45, -wn and -vtc=n now work together', 1fbc381.</p>
+
+</dd>
<dt id="implement-request-RT-133649-added-parameters--kbb-s-and--kba-s"><b>implement request RT #133649, added parameters -kbb=s and -kba=s</b></dt>
<dd>
<h1>Perltidy Change Log</h1>
-<h2>2020 10 01.02</h2>
+<h2>2020 10 01.03</h2>
-<pre><code>- implement request RT #133649, delete-old-newlines selectively. Two parameters,
+<pre><code>- Fixed issue git #44, -vtc=n flag was ignored when -wn was set.
+
+- implement request RT #133649, delete-old-newlines selectively. Two parameters,
-kbb=s or --keep-old-breakpoints-before=s, and
-kba=s or --keep-old-breakpoints-after=s
<h1 id="VERSION">VERSION</h1>
-<p>This man page documents Perl::Tidy version 20201001.02</p>
+<p>This man page documents Perl::Tidy version 20201001.03</p>
<h1 id="LICENSE">LICENSE</h1>
<dt id="et-n---entab-leading-whitespace"><b>-et=n</b>, <b>--entab-leading-whitespace</b></dt>
<dd>
-<p>This flag causes each <b>n</b> initial space characters to be replaced by one tab character. Note that the integer <b>n</b> is completely independent of the integer specified for indentation parameter, <b>-i=n</b>.</p>
+<p>This flag causes each <b>n</b> initial space characters to be replaced by one tab character.</p>
+
+<p>The value of the integer <b>n</b> can be any value but can be coordinated with the number of spaces used for intentation. For example, <b>-et=4 -ci=4 -i=4</b> will produce one tab for each indentation level and and one for each continuation indentation level. You may want to coordinate the value of <b>n</b> with what your display software assumes for the spacing of a tab.</p>
</dd>
<dt id="t---tabs"><b>-t</b>, <b>--tabs</b></dt>
<dd>
-<p>This flag causes one leading tab character to be inserted for each level of indentation. Certain other features are incompatible with this option, and if these options are also given, then a warning message will be issued and this flag will be unset. One example is the <b>-lp</b> option.</p>
+<p>This flag causes one leading tab character to be inserted for each level of indentation. Certain other features are incompatible with this option, and if these options are also given, then a warning message will be issued and this flag will be unset. One example is the <b>-lp</b> option. This flag is retained for backwards compatability, but if you use tabs, the <b>-et=n</b> flag is recommended.</p>
</dd>
<dt id="dt-n---default-tabsize-n"><b>-dt=n</b>, <b>--default-tabsize=n</b></dt>
<h1 id="VERSION">VERSION</h1>
-<p>This man page documents perltidy version 20201001.02</p>
+<p>This man page documents perltidy version 20201001.03</p>
<h1 id="BUG-REPORTS">BUG REPORTS</h1>
# Release version must be bumped, and it is probably past time for a
# release anyway.
- $VERSION = '20201001.02';
+ $VERSION = '20201001.03';
}
sub DESTROY {
=head1 VERSION
-This man page documents Perl::Tidy version 20201001.02
+This man page documents Perl::Tidy version 20201001.03
=head1 LICENSE
package Perl::Tidy::Debugger;
use strict;
use warnings;
-our $VERSION = '20201001.02';
+our $VERSION = '20201001.03';
sub new {
package Perl::Tidy::DevNull;
use strict;
use warnings;
-our $VERSION = '20201001.02';
+our $VERSION = '20201001.03';
sub new { my $self = shift; return bless {}, $self }
sub print { return }
sub close { return }
package Perl::Tidy::Diagnostics;
use strict;
use warnings;
-our $VERSION = '20201001.02';
+our $VERSION = '20201001.03';
sub AUTOLOAD {
package Perl::Tidy::FileWriter;
use strict;
use warnings;
-our $VERSION = '20201001.02';
+our $VERSION = '20201001.03';
sub AUTOLOAD {
{ #<<< A non-indenting brace to contain all lexical variables
use Carp;
-our $VERSION = '20201001.02';
+our $VERSION = '20201001.03';
# The Tokenizer will be loaded with the Formatter
##use Perl::Tidy::Tokenizer; # for is_keyword()
( $K_first, $K_last ) = @{$rK_range};
# remember original starting index in case it changes
- my $K_first_true= $K_first;
+ my $K_first_true = $K_first;
$rLL = $self->[_rLL_];
$radjusted_levels = $self->[_radjusted_levels_];
my $cvt = $closing_vertical_tightness{$token_next};
if (
- # Never append a trailing line like ')->pack(' because it
- # will throw off later alignment. So this line must start at a
- # deeper level than the next line (fix1 for welding, git #45).
+ # Never append a trailing line like ')->pack(' because it
+ # will throw off later alignment. So this line must start at a
+ # deeper level than the next line (fix1 for welding, git #45).
(
$nesting_depth_to_go[$ibeg_next] >=
$nesting_depth_to_go[ $iend_next + 1 ] + 1
package Perl::Tidy::HtmlWriter;
use strict;
use warnings;
-our $VERSION = '20201001.02';
+our $VERSION = '20201001.03';
use File::Basename;
use strict;
use warnings;
use Carp;
-our $VERSION = '20201001.02';
+our $VERSION = '20201001.03';
sub AUTOLOAD {
use strict;
use warnings;
use Carp;
-our $VERSION = '20201001.02';
+our $VERSION = '20201001.03';
sub AUTOLOAD {
package Perl::Tidy::IndentationItem;
use strict;
use warnings;
-our $VERSION = '20201001.02';
+our $VERSION = '20201001.03';
BEGIN {
package Perl::Tidy::LineBuffer;
use strict;
use warnings;
-our $VERSION = '20201001.02';
+our $VERSION = '20201001.03';
sub AUTOLOAD {
package Perl::Tidy::LineSink;
use strict;
use warnings;
-our $VERSION = '20201001.02';
+our $VERSION = '20201001.03';
sub AUTOLOAD {
package Perl::Tidy::LineSource;
use strict;
use warnings;
-our $VERSION = '20201001.02';
+our $VERSION = '20201001.03';
sub AUTOLOAD {
package Perl::Tidy::Logger;
use strict;
use warnings;
-our $VERSION = '20201001.02';
+our $VERSION = '20201001.03';
sub AUTOLOAD {
package Perl::Tidy::Tokenizer;
use strict;
use warnings;
-our $VERSION = '20201001.02';
+our $VERSION = '20201001.03';
use Perl::Tidy::LineBuffer;
use Carp;
# Set a flag to indicate if we might be at an __END__ or __DATA__ line
# This will be used below to avoid quoting a bare word followed by
# a fat comma.
- my $is_END_or_DATA;
+ my $is_END_or_DATA;
# trim start of this line unless we are continuing a quoted line
# do not trim end because we might end in a quote (test: deken4.pl)
&& $input_line =~ /^\s*__(END|DATA)__\s*$/;
}
-
# update the copy of the line for use in error messages
# This must be exactly what we give the pre_tokenizer
$tokenizer_self->[_line_of_text_] = $input_line;
package Perl::Tidy::VerticalAligner;
use strict;
use warnings;
-our $VERSION = '20201001.02';
+our $VERSION = '20201001.03';
use Perl::Tidy::VerticalAligner::Alignment;
use Perl::Tidy::VerticalAligner::Line;
{ #<<< A non-indenting brace
-our $VERSION = '20201001.02';
+our $VERSION = '20201001.03';
# _column_ # the current column number
# _saved_column_ # a place for temporary storage
package Perl::Tidy::VerticalAligner::Line;
use strict;
use warnings;
-our $VERSION = '20201001.02';
+our $VERSION = '20201001.03';
BEGIN {
my $i = 0;
projects / perltidy.git / commitdiff