diff options
author | Karl Berry <karl@freefriends.org> | 2014-12-16 19:03:03 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2014-12-16 19:03:03 +0000 |
commit | 1abeb648c1e8b4983df4b25b61c87b4bba4b5e1d (patch) | |
tree | 043406a0da8b291c0cad57bf6d0652614725b759 /Master/tlpkg/bin | |
parent | 97f8439b082e70bd39e12bb467dcc934a0342cbb (diff) |
remove taxonomy support, since the data is no longer being updated (but do not remove the actual texcatalogue.keywords file yet, until some testing is done)
git-svn-id: svn://tug.org/texlive/trunk@35840 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/bin')
-rwxr-xr-x | Master/tlpkg/bin/tl-update-keywords | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/Master/tlpkg/bin/tl-update-keywords b/Master/tlpkg/bin/tl-update-keywords index f7e76750f1a..72f57be5163 100755 --- a/Master/tlpkg/bin/tl-update-keywords +++ b/Master/tlpkg/bin/tl-update-keywords @@ -3,7 +3,7 @@ # parse a TeXCatalogue v2 .xml dump containing keywords and # characterizations # -# Copyright 2010, 2011 Norbert Preining +# Copyright 2010-2014 Norbert Preining # This file is licensed under the GNU General Public License version 2 # or any later version. @@ -37,7 +37,7 @@ GetOptions( "help|?" => \$help) or pod2usage(1); pod2usage(-exitstatus => 0, -verbose => 2) if $help; -my $progname = TeXLive::TLUtils::basename($0); +my $prg = TeXLive::TLUtils::basename($0); exit (&main()); @@ -48,7 +48,7 @@ sub main if (!defined($tcfile)) { $io = \*STDIN; } else { - -f $tcfile || die "$progname: argument to --input is not a file: $!\n"; + -f $tcfile || die "$prg: argument to --input is not a file: $!\n"; open($io, "<", $tcfile) || die "Cannot open input file $tcfile: $!"; } @@ -62,8 +62,8 @@ sub main open($out, ">$output") || die "Cannot open output file $output: $!"; } chomp (my $date = `LC_ALL=C date`); - chomp (my $progname = `basename $0`); - print $out "# Generated $date by $progname.\n"; + chomp (my $prg = `basename $0`); + print $out "# Generated $date by $prg.\n"; print $out Data::Dumper->Dump([\%taxonomy], ["taxonomy"]), $/; } @@ -213,11 +213,11 @@ __END__ =head1 NAME -parse-texcatalogue-keywords - parse the experimental TeX Catalogue +tl-update-keywords - parse the experimental TeX Catalogue =head1 SYNOPSIS -parse-texcatalogue-keywords [--input ....] [--output ...] [--help|-h|-?] +tl-update-keywords [--input ....] [--output ...] [--help|-h|-?] =head1 DESCRIPTION |