]> git.donarmstrong.com Git - perltidy.git/commitdiff
update version to 20190601
authorSteve Hancock <perltidy@users.sourceforge.net>
Thu, 30 May 2019 14:39:19 +0000 (07:39 -0700)
committerSteve Hancock <perltidy@users.sourceforge.net>
Thu, 30 May 2019 14:39:19 +0000 (07:39 -0700)
24 files changed:
CHANGES.md
bin/perltidy
docs/ChangeLog.html
docs/Tidy.html
docs/perltidy.html
lib/Perl/Tidy.pm
lib/Perl/Tidy.pod
lib/Perl/Tidy/Debugger.pm
lib/Perl/Tidy/DevNull.pm
lib/Perl/Tidy/Diagnostics.pm
lib/Perl/Tidy/FileWriter.pm
lib/Perl/Tidy/Formatter.pm
lib/Perl/Tidy/HtmlWriter.pm
lib/Perl/Tidy/IOScalar.pm
lib/Perl/Tidy/IOScalarArray.pm
lib/Perl/Tidy/IndentationItem.pm
lib/Perl/Tidy/LineBuffer.pm
lib/Perl/Tidy/LineSink.pm
lib/Perl/Tidy/LineSource.pm
lib/Perl/Tidy/Logger.pm
lib/Perl/Tidy/Tokenizer.pm
lib/Perl/Tidy/VerticalAligner.pm
lib/Perl/Tidy/VerticalAligner/Alignment.pm
lib/Perl/Tidy/VerticalAligner/Line.pm

index cfe8c7b82bacad31e77349dbc888b89e64d2b1c9..e81e4d2c6c3aef65d356ce623ab666cb70aa739b 100644 (file)
@@ -1,16 +1,16 @@
 # Perltidy Change Log
 
-## 2018 11 20.01
+## 2019 06 01
 
     - rt #128477: Prevent inconsistent owner/group and setuid/setgid bits. 
       In the -b (--backup-and-modify-in-place) mode, an attempt is made to set ownership
-      of the output file equal to the input file, if they differ.  
+      of the output file equal to the input file, if they differ.
       In all cases, if the final output file ownership differs from input file, any setuid/setgid bits are cleared.
 
-    - added option -bom  (--break-at-old-method-breakpoints) by
-      merrillymeredith which preserves breakpoints of method chains
+    - Added option -bom  (--break-at-old-method-breakpoints) by
+      merrillymeredith which preserves breakpoints of method chains. Modified to also handle a cuddled call style.
 
-    - merged patch to fix Windows EOL translation error with UTF-8 written by
+    - Merged patch to fix Windows EOL translation error with UTF-8 written by
       Ron Ivy. This update prevents automatic conversion to 'DOS' CRLF line
       endings.
 
@@ -21,7 +21,7 @@
         n=2 means always add semicolons in one-line blocks
       The current behavior corresponds to the default n=1.
 
-    - RT #128216, very minor update to prevent inserting unwanted blank line at
+    - RT #128216, Minor update to prevent inserting unwanted blank line at
       indentation level change.  This should not change existing scripts.
 
     - RT #81852: Improved indentation when quoted word (qw) lists are 
@@ -45,7 +45,7 @@
       sequences of selected keywords. This can be activated with the -kgb* 
       series of parameters described in the manual.
 
-    - Rewrote vertical algnment module.  It is much better at finding
+    - Rewrote vertical algnment module.  It is better at finding
       patterns in complex code. For example,
 
        OLD:
@@ -62,7 +62,7 @@
 
     - RT #118553, "leave only one newline at end of file". This option was not 
       added because of undesirable side effects, but a new filter script
-      was added which can do this, "examples/delete_ending_blank_lines.pl".  
+      was added which can do this, "examples/delete_ending_blank_lines.pl".
 
 ## 2018 11 20
 
index 9392000ebf96c2857e9b9aeb9739df816e8f568c..032fead7b29b03b946c08557f98d7b9e3ce0c241 100755 (executable)
@@ -3735,7 +3735,7 @@ perlstyle(1), Perl::Tidy(3)
 
 =head1 VERSION
 
-This man page documents perltidy version 20181120.01
+This man page documents perltidy version 20190601
 
 =head1 BUG REPORTS
 
index 62d51c08c924116b4c833fe3896d8ed34e171034..b7eedbe7d419319b5701d3509efa30625b61223a 100644 (file)
@@ -1,16 +1,16 @@
 <h1>Perltidy Change Log</h1>
 
-<h2>2018 11 20.01</h2>
+<h2>2019 06 01</h2>
 
 <pre><code>- rt #128477: Prevent inconsistent owner/group and setuid/setgid bits. 
   In the -b (--backup-and-modify-in-place) mode, an attempt is made to set ownership
-  of the output file equal to the input file, if they differ.  
+  of the output file equal to the input file, if they differ.
   In all cases, if the final output file ownership differs from input file, any setuid/setgid bits are cleared.
 
-- added option -bom  (--break-at-old-method-breakpoints) by
-  merrillymeredith which preserves breakpoints of method chains
+- Added option -bom  (--break-at-old-method-breakpoints) by
+  merrillymeredith which preserves breakpoints of method chains. Modified to also handle a cuddled call style.
 
-- merged patch to fix Windows EOL translation error with UTF-8 written by
+- Merged patch to fix Windows EOL translation error with UTF-8 written by
   Ron Ivy. This update prevents automatic conversion to 'DOS' CRLF line
   endings.
 
@@ -21,7 +21,7 @@
     n=2 means always add semicolons in one-line blocks
   The current behavior corresponds to the default n=1.
 
-- RT #128216, very minor update to prevent inserting unwanted blank line at
+- RT #128216, Minor update to prevent inserting unwanted blank line at
   indentation level change.  This should not change existing scripts.
 
 - RT #81852: Improved indentation when quoted word (qw) lists are 
@@ -45,7 +45,7 @@
   sequences of selected keywords. This can be activated with the -kgb* 
   series of parameters described in the manual.
 
-- Rewrote vertical algnment module.  It is much better at finding
+- Rewrote vertical algnment module.  It is better at finding
   patterns in complex code. For example,
 
 OLD:
index 51b92fad2134923e75770523ec748ab9f3a8be48..2d3a162aa8ad9fffba3724f58ce3b897317eba95 100644 (file)
 
 <h1 id="VERSION">VERSION</h1>
 
-<p>This man page documents Perl::Tidy version 20181120.01</p>
+<p>This man page documents Perl::Tidy version 20190601</p>
 
 <h1 id="LICENSE">LICENSE</h1>
 
index d0f1bfb0a683bededb43bb99d7b9c6ba356b60d6..732e3d2e6292d32177faf5cc9e857ccda007fecf 100644 (file)
 
 <h1 id="VERSION">VERSION</h1>
 
-<p>This man page documents perltidy version 20181120.01</p>
+<p>This man page documents perltidy version 20190601</p>
 
 <h1 id="BUG-REPORTS">BUG REPORTS</h1>
 
index e48463ba4a13a6ba07f32ab187d49c1e3321eef7..55af333c7501b8a5a8d8a10693ace2fa72d0edc8 100644 (file)
@@ -109,7 +109,7 @@ BEGIN {
     # Release version must be bumped, and it is probably past time for a
     # release anyway.
 
-    $VERSION = '20181120.01';
+    $VERSION = '20190601';
 }
 
 sub streamhandle {
@@ -1350,11 +1350,18 @@ EOM
                         }
                     }
 
-                    # Make the output file writable unless we are in -b mode.
-                    # The issue is that perltidy currently does not unlink
-                    # existing output files before writing to them, so if an
-                    # existing output file (like xxxxx.tdy) is read-only then
-                    # perltidy will fail.
+                   # Make the output file writable unless we are in -b mode.
+                   # The reason is that perltidy does not unlink existing
+                   # output files before writing to them, for safety, so if an
+                   # existing output file is marked not writable then perltidy
+                   # will stop. This can prevent a disaster for a user who
+                   # accidentally enters "-o important_data", but it also
+                   # means that perltidy may fail when rerun with its default
+                   # output file unless it marks its own output files
+                   # writable. The alternative, of always unlinking the
+                   # designated output file, is unsafe, except in -b mode,
+                   # where there is an assumption that a previous backup can
+                   # be unlinked even if not writable.
                     if ( !$in_place_modify ) {
                         $output_file_permissions |= oct(600);
                     }
index 0ebc27be7c27dcef04c37a5a60fd34036f8f183e..23c8b02bd102590096795812211ed8bb13e23f5b 100644 (file)
@@ -410,7 +410,7 @@ C<write_debug_entry> in Tidy.pm.
 
 =head1 VERSION
 
-This man page documents Perl::Tidy version 20181120.01
+This man page documents Perl::Tidy version 20190601
 
 =head1 LICENSE
 
index 285c2626238e75e1c3b9606ce27aa52b1b9957c2..2fe1bbb07a5ba8694a232f2a3109cae74b4f4975 100644 (file)
@@ -7,7 +7,7 @@
 package Perl::Tidy::Debugger;
 use strict;
 use warnings;
-our $VERSION = '20181120.01';
+our $VERSION = '20190601';
 
 sub new {
 
index 27352f6ee83726920c8f3be371a4bf6ab13a2fe6..e755e0c307245c2fb3ab6e3332f3eebad7773e93 100644 (file)
@@ -7,7 +7,7 @@
 package Perl::Tidy::DevNull;
 use strict;
 use warnings;
-our $VERSION = '20181120.01';
+our $VERSION = '20190601';
 sub new { my $self = shift; return bless {}, $self }
 sub print { return }
 sub close { return }
index 5e013c714a5314732a9af6e144aabff12b989fb8..f2d6ec94f6b7b31cd7a4e089b92c484ae6e615ca 100644 (file)
@@ -20,7 +20,7 @@
 package Perl::Tidy::Diagnostics;
 use strict;
 use warnings;
-our $VERSION = '20181120.01';
+our $VERSION = '20190601';
 
 sub new {
 
index 7c72d43c6594863fe5a9db804e5200cf92dc1e77..c7b31923eb98a9a9ac0043a305b647e9d3312216 100644 (file)
@@ -7,7 +7,7 @@
 package Perl::Tidy::FileWriter;
 use strict;
 use warnings;
-our $VERSION = '20181120.01';
+our $VERSION = '20190601';
 
 # Maximum number of little messages; probably need not be changed.
 my $MAX_NAG_MESSAGES = 6;
index 074b64eb1ce9ba496c9869603ffef35cde7c775b..9766e25ed4ef04250c4df5aac289330e0a108821 100644 (file)
@@ -12,7 +12,7 @@ package Perl::Tidy::Formatter;
 use strict;
 use warnings;
 use Carp;
-our $VERSION = '20181120.01';
+our $VERSION = '20190601';
 
 # The Tokenizer will be loaded with the Formatter
 ##use Perl::Tidy::Tokenizer;    # for is_keyword()
index 7ff6ea7ede0d4cc3ba93bfca27a1d79b5e5e9c9c..0d82978ba7039cd21fed041a38f9228d013e67cf 100644 (file)
@@ -7,7 +7,7 @@
 package Perl::Tidy::HtmlWriter;
 use strict;
 use warnings;
-our $VERSION = '20181120.01';
+our $VERSION = '20190601';
 
 use File::Basename;
 
index 28328a8de672e4f585fe7f4403ff97635f97c2be..2bfb07fbaf055f806043a80b0e39f19c9d1143ea 100644 (file)
@@ -10,7 +10,7 @@ package Perl::Tidy::IOScalar;
 use strict;
 use warnings;
 use Carp;
-our $VERSION = '20181120.01';
+our $VERSION = '20190601';
 
 sub new {
     my ( $package, $rscalar, $mode ) = @_;
index 8e040b5785bd3ae2eb8c545ebcb7ff75e089a736..118f1590922ebf73496ae6feba15cfabd04d0398 100644 (file)
@@ -14,7 +14,7 @@ package Perl::Tidy::IOScalarArray;
 use strict;
 use warnings;
 use Carp;
-our $VERSION = '20181120.01';
+our $VERSION = '20190601';
 
 sub new {
     my ( $package, $rarray, $mode ) = @_;
index 3181f6c4494393ceed43f2df03fcddaae2e8bce6..b0edd0afd26ec85c21cc44ad52ec68ae887dac26 100644 (file)
@@ -8,7 +8,7 @@
 package Perl::Tidy::IndentationItem;
 use strict;
 use warnings;
-our $VERSION = '20181120.01';
+our $VERSION = '20190601';
 
 sub new {
 
index 973482649c24c14c0b1afa78737dc2835c8bae90..ade5b2c37b41b60f991ab897bf7822e0d19e39c4 100644 (file)
@@ -12,7 +12,7 @@
 package Perl::Tidy::LineBuffer;
 use strict;
 use warnings;
-our $VERSION = '20181120.01';
+our $VERSION = '20190601';
 
 sub new {
 
index 7d9f4a14b5f16bf82ce2b1d0906de8f0028fd23c..98bea19bf66baebd7e53fc1e8265ff0fbe51b20f 100644 (file)
@@ -8,7 +8,7 @@
 package Perl::Tidy::LineSink;
 use strict;
 use warnings;
-our $VERSION = '20181120.01';
+our $VERSION = '20190601';
 
 sub new {
 
index df30c80ead9277d71ca4220b01bba4ee5eea0083..5d4ec98c77bb442f0dfa170333be5ef1f01b3158 100644 (file)
@@ -8,7 +8,7 @@
 package Perl::Tidy::LineSource;
 use strict;
 use warnings;
-our $VERSION = '20181120.01';
+our $VERSION = '20190601';
 
 sub new {
 
index 72cde5ea57cb86a26eba484af73f02e06d433daa..547a635d6ffe6e6001867d1f3de3f8d134de38dc 100644 (file)
@@ -7,7 +7,7 @@
 package Perl::Tidy::Logger;
 use strict;
 use warnings;
-our $VERSION = '20181120.01';
+our $VERSION = '20190601';
 
 sub new {
 
index d18d1a36cc62703996cd01d1aefd543ac8b5a094..c7bc6ff7f9b8b0f63b84cc6a3b5bd758aebd31c7 100644 (file)
@@ -21,7 +21,7 @@
 package Perl::Tidy::Tokenizer;
 use strict;
 use warnings;
-our $VERSION = '20181120.01';
+our $VERSION = '20190601';
 
 use Perl::Tidy::LineBuffer;
 
index 2c7a79238820e706ac4e6de76988f5fec9ea6e14..2ae6e19bab5781dc7abdfd18a423b754c53c8c97 100644 (file)
@@ -1,7 +1,7 @@
 package Perl::Tidy::VerticalAligner;
 use strict;
 use warnings;
-our $VERSION = '20181120.01';
+our $VERSION = '20190601';
 
 use Perl::Tidy::VerticalAligner::Alignment;
 use Perl::Tidy::VerticalAligner::Line;
index d4748da81eccade436c1d91bcfa8b3d8168550a3..8732e96e89e7948f86f7de543bd4c1b412c93653 100644 (file)
@@ -7,7 +7,7 @@
 package Perl::Tidy::VerticalAligner::Alignment;
 use strict;
 use warnings;
-our $VERSION = '20181120.01';
+our $VERSION = '20190601';
 
 {
 
index 74115164db39323f431d19fafd92d9191099ede9..373896c1c351ce5c274e9cdd93c83d1bd0a74b8d 100644 (file)
@@ -8,7 +8,7 @@
 package Perl::Tidy::VerticalAligner::Line;
 use strict;
 use warnings;
-our $VERSION = '20181120.01';
+our $VERSION = '20190601';
 
 {