diff options
author | Norbert Preining <preining@logic.at> | 2008-04-21 19:03:27 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2008-04-21 19:03:27 +0000 |
commit | 5e6a4842a0147dcd743b514e104b27fefb944f5c (patch) | |
tree | 64e26230931410cdd6b2e3730dbb7defac8d9a1b /Master/tlpkg/TeXLive/TLMedia.pm | |
parent | 7e485db44fe3d5a205560f3f19c5a03591f4993e (diff) |
more s/// fixes
git-svn-id: svn://tug.org/texlive/trunk@7575 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive/TLMedia.pm')
-rw-r--r-- | Master/tlpkg/TeXLive/TLMedia.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Master/tlpkg/TeXLive/TLMedia.pm b/Master/tlpkg/TeXLive/TLMedia.pm index 682c05e763b..a8e3dfa91ad 100644 --- a/Master/tlpkg/TeXLive/TLMedia.pm +++ b/Master/tlpkg/TeXLive/TLMedia.pm @@ -160,13 +160,13 @@ sub install_package { if ($container_src_split && $opt_src && ($pkg !~ m/\./) && $tlpobj->srcfiles) { my $srccontainer = $container; - $srccontainer =~ s/(.tar.lzma|.zip)/.source$1/; + $srccontainer =~ s/(\.tar\.lzma|\.zip)$/.source$1/; $self->_install_package($srccontainer,\@installfiles,$totlpdb); } if ($container_doc_split && $opt_doc && ($pkg !~ m/\./) && $tlpobj->docfiles) { my $doccontainer = $container; - $doccontainer =~ s/(.tar.lzma|.zip)/.doc$1/; + $doccontainer =~ s/(\.tar\.lzma|\.zip)$/.doc$1/; $self->_install_package($doccontainer,\@installfiles,$totlpdb); } } |