diff options
author | Karl Berry <karl@freefriends.org> | 2023-09-09 20:10:52 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2023-09-09 20:10:52 +0000 |
commit | d8c36eec0fe1018fe55ddccabc9e59727a29f9f3 (patch) | |
tree | f011558bb25e6856476de9834635ddb3cd6f0184 /Master/texmf-dist/scripts/latexindent/LatexIndent/Special.pm | |
parent | 016f06c77e15ad911a2b886c7b0cd4338675e2fc (diff) |
latexindent (9sep23)
git-svn-id: svn://tug.org/texlive/trunk@68225 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/scripts/latexindent/LatexIndent/Special.pm')
-rw-r--r-- | Master/texmf-dist/scripts/latexindent/LatexIndent/Special.pm | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/Master/texmf-dist/scripts/latexindent/LatexIndent/Special.pm b/Master/texmf-dist/scripts/latexindent/LatexIndent/Special.pm index 331d5e87cf9..f68db3400ba 100644 --- a/Master/texmf-dist/scripts/latexindent/LatexIndent/Special.pm +++ b/Master/texmf-dist/scripts/latexindent/LatexIndent/Special.pm @@ -17,12 +17,12 @@ package LatexIndent::Special; # For all communication, please visit: https://github.com/cmhughes/latexindent.pl use strict; use warnings; -use LatexIndent::Tokens qw/%tokens/; +use LatexIndent::Tokens qw/%tokens/; use LatexIndent::TrailingComments qw/$trailingCommentRegExp/; -use LatexIndent::GetYamlSettings qw/%mainSettings/; -use LatexIndent::Switches qw/$is_t_switch_active $is_tt_switch_active/; -use LatexIndent::LogFile qw/$logger/; -use LatexIndent::IfElseFi qw/$ifElseFiBasicRegExp/; +use LatexIndent::GetYamlSettings qw/%mainSettings/; +use LatexIndent::Switches qw/$is_t_switch_active $is_tt_switch_active/; +use LatexIndent::LogFile qw/$logger/; +use LatexIndent::IfElseFi qw/$ifElseFiBasicRegExp/; use Data::Dumper; use Exporter qw/import/; our @ISA = "LatexIndent::Document"; # class inheritance, Programming Perl, pg 321 @@ -114,11 +114,11 @@ sub construct_special_begin { # info to the log file $logger->trace("*The special beginnings regexp is: (see specialBeginEnd)") if $is_tt_switch_active; - $logger->trace($specialBegins) if $is_tt_switch_active; + $logger->trace($specialBegins) if $is_tt_switch_active; # overall special regexp $logger->trace("*The overall special regexp is: (see specialBeginEnd)") if $is_tt_switch_active; - $logger->trace($specialAllMatchesRegExp) if $is_tt_switch_active; + $logger->trace($specialAllMatchesRegExp) if $is_tt_switch_active; # basic special begin regexp $specialBeginBasicRegExp = qr/$specialBegins/; @@ -134,7 +134,7 @@ sub find_special { # otherwise loop through the special begin/end $logger->trace("*Searching ${$self}{name} for special begin/end (see specialBeginEnd)") if $is_t_switch_active; - $logger->trace( Dumper( \%{ $mainSettings{specialBeginEnd} } ) ) if $is_tt_switch_active; + $logger->trace( Dumper( \%{ $mainSettings{specialBeginEnd} } ) ) if $is_tt_switch_active; # keep looping as long as there is a special match of some kind while ( ${$self}{body} =~ m/$specialAllMatchesRegExp/sx ) { |