remove unused constants

diff --git a/lib/Perl/Tidy/HtmlWriter.pm b/lib/Perl/Tidy/HtmlWriter.pm
index 16d05be2a3c8a90b0ff5d64bffd5471d3cfdf607..84c96778622a36cab62c8c43a0f32e8df8715aee 100644 (file)
--- a/lib/Perl/Tidy/HtmlWriter.pm
+++ b/lib/Perl/Tidy/HtmlWriter.pm
@@ -514,8 +514,8 @@ sub check_options {
     # X11 color names for default settings that seemed to look ok
     # (these color names are only used for programming clarity; the hex
     # numbers are actually written)
+##  use constant SaddleBrown   => "#8B4513";
     use constant ForestGreen   => "#228B22";
-    use constant SaddleBrown   => "#8B4513";
     use constant magenta4      => "#8B008B";
     use constant IndianRed3    => "#CD5555";
     use constant DeepSkyBlue4  => "#00688B";

diff --git a/lib/Perl/Tidy/IndentationItem.pm b/lib/Perl/Tidy/IndentationItem.pm
index 49bf558897a3bde443fe5110688aeabf0ee7173e..cc1bb96cf11bd272f34668971a42388f7af51dee 100644 (file)
--- a/lib/Perl/Tidy/IndentationItem.pm
+++ b/lib/Perl/Tidy/IndentationItem.pm
@@ -28,7 +28,6 @@ BEGIN {
         _recoverable_spaces_ => $i++,
         _align_seqno_        => $i++,
         _marked_             => $i++,
-        _stack_depth_        => $i++,
         _K_begin_line_       => $i++,
         _arrow_count_        => $i++,
         _standard_spaces_    => $i++,

diff --git a/lib/Perl/Tidy/Logger.pm b/lib/Perl/Tidy/Logger.pm
index 21da632d00bcc5506513857bdd90d66cf73b84a3..be502ecc5496fdec09b083df50280e3412ee39e8 100644 (file)
--- a/lib/Perl/Tidy/Logger.pm
+++ b/lib/Perl/Tidy/Logger.pm
@@ -12,7 +12,6 @@ our $VERSION = '20240511.09';
 use Carp;
 use English qw( -no_match_vars );
 
-use constant DEVEL_MODE   => 0;
 use constant EMPTY_STRING => q{};
 use constant SPACE        => q{ };