summaryrefslogtreecommitdiff
path: root/systems/texlive/tlnet/tlpkg/TeXLive/TLTREE.pm
diff options
context:
space:
mode:
Diffstat (limited to 'systems/texlive/tlnet/tlpkg/TeXLive/TLTREE.pm')
-rw-r--r--systems/texlive/tlnet/tlpkg/TeXLive/TLTREE.pm57
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