diff options
author | Norbert Preining <preining@logic.at> | 2007-10-18 14:19:51 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2007-10-18 14:19:51 +0000 |
commit | 383376384e8be7e270474ce287fea73559c81d0a (patch) | |
tree | e6164f4775a5321c182363a777f271c2a9b572ab /Master/tlpkg/TeXLive/TLPOBJ.pm | |
parent | d41ee107aabd6ac4e2aff55782060931622f48a4 (diff) |
remove the Category at the beginning of a depend line
adapt modules
update texlive tlpdb, including the info from the catalogue
git-svn-id: svn://tug.org/texlive/trunk@5228 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive/TLPOBJ.pm')
-rw-r--r-- | Master/tlpkg/TeXLive/TLPOBJ.pm | 19 |
1 files changed, 16 insertions, 3 deletions
diff --git a/Master/tlpkg/TeXLive/TLPOBJ.pm b/Master/tlpkg/TeXLive/TLPOBJ.pm index e3cde9b0acf..b8e81eaf11a 100644 --- a/Master/tlpkg/TeXLive/TLPOBJ.pm +++ b/Master/tlpkg/TeXLive/TLPOBJ.pm @@ -6,7 +6,7 @@ package TeXLive::TLPOBJ; -use TeXLive::TLConfig qw($DefaultCategory $CategoriesRegexp); +use TeXLive::TLConfig qw($DefaultCategory $CategoriesRegexp $MetaCategoriesRegexp); use TeXLive::TLUtils; use File::Path; use Cwd; @@ -86,7 +86,7 @@ sub from_fh { ($lastcmd eq "depend") ) { $line =~ s/^ /${lastcmd}continued /; } else { - die("Continuation of $lastcmd not allowed, please fix tlpobj!\n"); + die("Continuation of $lastcmd not allowed, please fix tlpobj: line = $line!\n"); } } if ($line =~ /^name\s*([-\w]+)$/) { @@ -536,6 +536,14 @@ sub update_from_catalogue { } } +sub is_meta_package { + my $self = shift; + if ($self->category =~ /^$MetaCategoriesRegexp$/) { + return 1; + } + return 0; +} + # Helpers. # @@ -936,6 +944,11 @@ If arguments are given, they are assumed to be architecture names, and it returns the above plus the sum of sizes of C<binsize> for those architectures. +=item C<is_meta_package> + +Returns true if the package is a meta package as defined in TLConfig +(Currently Collection and Scheme). + =item C<{add,remove}_{src,run,doc}files(@files)> adds or removes files to the respective list of files. @@ -956,7 +969,7 @@ returns a list of all files of all types. =head1 SEE ALSO -The modules L<TeXLive::TLUtils>, L<TeXLive::TLPSRC>, +The modules L<TeXLive::TLConfig>, L<TeXLive::TLUtils>, L<TeXLive::TLPSRC>, L<TeXLive::TLPDB>, L<TeXLive::TLTREE>, L<TeXLive::TeXCatalogue>. =head1 AUTHORS AND COPYRIGHT |