diff options
Diffstat (limited to 'systems/texlive/tlnet/tlpkg/TeXLive/TLTREE.pm')
-rw-r--r-- | systems/texlive/tlnet/tlpkg/TeXLive/TLTREE.pm | 57 |
1 files changed, 53 insertions, 4 deletions
diff --git a/systems/texlive/tlnet/tlpkg/TeXLive/TLTREE.pm b/systems/texlive/tlnet/tlpkg/TeXLive/TLTREE.pm index 79bc5fdda9..462176c21d 100644 --- a/systems/texlive/tlnet/tlpkg/TeXLive/TLTREE.pm +++ b/systems/texlive/tlnet/tlpkg/TeXLive/TLTREE.pm @@ -1,15 +1,50 @@ -# $Id: TLTREE.pm 55106 2020-05-11 21:11:50Z karl $ +# $Id: TLTREE.pm 59226 2021-05-16 18:22:05Z karl $ # TeXLive::TLTREE.pm - work with the tree of all files -# Copyright 2007-2020 Norbert Preining +# Copyright 2007-2021 Norbert Preining # This file is licensed under the GNU General Public License version 2 # or any later version. package TeXLive::TLTREE; -my $svnrev = '$Revision: 55106 $'; +my $svnrev = '$Revision: 59226 $'; my $_modulerevision = ($svnrev =~ m/: ([0-9]+) /) ? $1 : "unknown"; sub module_revision { return $_modulerevision; } +=pod + +=head1 NAME + +C<TeXLive::TLTREE> -- TeX Live tree of all files + +=head1 SYNOPSIS + + use TeXLive::TLTREE; + my $tltree = TeXLive::TLTREE->new(); + + $tltree->init_from_svn(); + $tltree->init_from_statusfile(); + $tltree->init_from_files(); + $tltree->init_from_git(); + $tltree->init_from_gitsvn(); + $tltree->print(); + $tltree->find_alldirs(); + $tltree->print_node(); + $tltree->walk_tree(); + $tltree->add_path_to_tree(); + $tltree->file_svn_lastrevision(); + $tltree->size_of(); + $tltree->get_matching_files(); + $tltree->files_under_path(); + $tltree->svnroot(); + $tltree->revision(); + $tltree->architectures(); + +=head1 DESCRIPTION + +DOCUMENTATION MISSING, SORRY!!! + +=cut + use TeXLive::TLUtils; sub new { @@ -531,8 +566,22 @@ sub architectures { return defined $self->{'archs'} ? @{ $self->{'archs'} } : (); } - 1; +__END__ + +=head1 SEE ALSO + +The modules L<TeXLive::TLPSRC>, L<TeXLive::TLPOBJ>, L<TeXLive::TLPDB>, +L<TeXLive::TLUtils>, etc., and the documentation in the repository: +C<Master/tlpkg/doc/>. + +=head1 AUTHORS AND COPYRIGHT + +This script and its documentation were written for the TeX Live +distribution (L<https://tug.org/texlive>) and both are licensed under the +GNU General Public License Version 2 or later. + +=cut ### Local Variables: ### perl-indent-level: 2 |