summaryrefslogtreecommitdiff
path: root/Build/source
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2022-04-04 20:57:57 +0000
committerKarl Berry <karl@freefriends.org>2022-04-04 20:57:57 +0000
commit0fe7398600cc177e0daad519a135544e9ca250e3 (patch)
treead85161884de6357244c3f2faf5cf83801b484f8 /Build/source
parent478aa462861970013439713474582671fa6d5c3c (diff)
latexindent (4apr22)
git-svn-id: svn://tug.org/texlive/trunk@62906 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source')
-rwxr-xr-xBuild/source/texk/texlive/linked_scripts/latexindent/latexindent.pl11
1 files changed, 8 insertions, 3 deletions
diff --git a/Build/source/texk/texlive/linked_scripts/latexindent/latexindent.pl b/Build/source/texk/texlive/linked_scripts/latexindent/latexindent.pl
index 70edb2f4a75..be2d51b6f43 100755
--- a/Build/source/texk/texlive/linked_scripts/latexindent/latexindent.pl
+++ b/Build/source/texk/texlive/linked_scripts/latexindent/latexindent.pl
@@ -1,5 +1,5 @@
#!/usr/bin/env perl
-# latexindent.pl, version 3.16, 2022-03-13
+# latexindent.pl, version 3.17.1, 2022-04-04
#
# This program is free software: you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
@@ -39,6 +39,7 @@ GetOptions (
"yaml|y=s"=>\$switches{yaml},
"onlydefault|d"=>\$switches{onlyDefault},
"overwrite|w"=>\$switches{overwrite},
+ "overwriteIfDifferent|wd"=>\$switches{overwriteIfDifferent},
"outputfile|o=s"=>\$switches{outputToFile},
"modifylinebreaks|m"=>\$switches{modifyLineBreaks},
"logfile|g=s"=>\$switches{logFileName},
@@ -51,8 +52,12 @@ GetOptions (
"check|k"=>\$switches{check},
"checkv|kv"=>\$switches{checkverbose},
"lines|n=s"=>\$switches{lines},
+ "GCString"=>\$switches{GCString},
);
+# conditionally load the GCString module
+eval "use Unicode::GCString" if $switches{GCString};
+
# check local settings doesn't interfer with reading the file;
# this can happen if the script is called as follows:
#
@@ -71,6 +76,6 @@ if($switches{readLocalSettings} and scalar(@ARGV) < 1) {
# allow STDIN as input, if a filename is not present
unshift( @ARGV, '-' ) unless @ARGV;
-my $document = bless ({name=>"mainDocument",modifyLineBreaksYamlName=>"mainDocument",fileName=>$ARGV[0],switches=>\%switches},"LatexIndent::Document");
-$document->latexindent;
+my $document = bless ({name=>"mainDocument",modifyLineBreaksYamlName=>"mainDocument",switches=>\%switches},"LatexIndent::Document");
+$document->latexindent( \@ARGV );
exit(0);