diff options
author | Norbert Preining <preining@logic.at> | 2009-02-09 07:18:46 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2009-02-09 07:18:46 +0000 |
commit | cae7f6f90f13cfed35ba468df52ce7aed655ad71 (patch) | |
tree | abd319b7e7b4282579b573b26bd938654e82ce89 /Master/texmf | |
parent | c92f1ff98e4fc53d91cec289ca90cfd8ab6b15f1 (diff) |
check for .source.tar.lzma files and not for .src.tar, why on earth
did I make that so assymetric ...
git-svn-id: svn://tug.org/texlive/trunk@12123 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf')
-rwxr-xr-x | Master/texmf/scripts/texlive/tlmgr.pl | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgr.pl b/Master/texmf/scripts/texlive/tlmgr.pl index c60cf2199fe..149a02a05e6 100755 --- a/Master/texmf/scripts/texlive/tlmgr.pl +++ b/Master/texmf/scripts/texlive/tlmgr.pl @@ -300,20 +300,20 @@ sub execute_action { # src or doc files from a different package. # We should have that package already installed ... my $pkg = $tlpobj->name; - if ($pkg =~ m/^(.*)\.(src|doc)$/) { + if ($pkg =~ m/^(.*)\.(source|doc)$/) { # got a .src or .doc package my $type = $2; my $mothership = $1; my $mothertlp = $localtlpdb->get_package($mothership); if (!defined($mothertlp)) { - tlwarn("We are trying to add ${type}files to a not existing package $mothership!\n"); + tlwarn("We are trying to add ${type} files to a not existing package $mothership!\n"); tlwarn("Trying to continue!\n"); # the best we can do is rename that package to $mothername and add it! $tlpobj->name($mothership); # add the src/docfiles tlpobj under the mothership name $localtlpdb->add_tlpobj($tlpobj); } else { - if ($type eq "src") { + if ($type eq "source") { $mothertlp->srcfiles($tlpobj->srcfiles); $mothertlp->srcsize($tlpobj->srcsize); } else { @@ -502,8 +502,8 @@ sub remove_package { # also remove the .tlpobj file push @files, "tlpkg/tlpobj/$pkg.tlpobj"; # and the ones from src/doc splitting - if (-r "tlpkg/tlpobj/$pkg.src.tlpobj") { - push @files, "tlpkg/tlpobj/$pkg.src.tlpobj"; + if (-r "tlpkg/tlpobj/$pkg.source.tlpobj") { + push @files, "tlpkg/tlpobj/$pkg.source.tlpobj"; } if (-r "tlpkg/tlpobj/$pkg.doc.tlpobj") { push @files, "tlpkg/tlpobj/$pkg.doc.tlpobj"; |