From: Steve Hancock <perltidy@users.sourceforge.net>
Date: Thu, 8 Aug 2024 00:14:50 +0000 (-0700)
Subject: remove unused constants
X-Git-Tag: 20240511.10~15
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=8051b6a64ea76a0301ee82e77d10317b1bad3e11;p=perltidy.git

remove unused constants
---

diff --git a/lib/Perl/Tidy/HtmlWriter.pm b/lib/Perl/Tidy/HtmlWriter.pm
index 16d05be2..84c96778 100644
--- 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 49bf5588..cc1bb96c 100644
--- 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 21da632d..be502ecc 100644
--- 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{ };