Author: frank
Date: 2006-03-15 19:26:07 +0000 (Wed, 15 Mar 2006)
New Revision: 1063
Modified:
tetex-base/trunk/debian/tpm2licenses-new.pl
Log:
don't use references without need, and act nice if there are no docfiles
Modified: tetex-base/trunk/debian/tpm2licenses-new.pl
===================================================================
--- tetex-base/trunk/debian/tpm2licenses-new.pl 2006-03-15 19:25:09 UTC (rev
1062)
+++ tetex-base/trunk/debian/tpm2licenses-new.pl 2006-03-15 19:26:07 UTC (rev
1063)
@@ -243,13 +243,14 @@
for ($debian_package) {
if ( /^texlive$/ ) { 1 };
if ( /^tetex-base$/ ) {
- foreach (\$RunFiles{"text"}, \$DocFiles{"text"}) {
- my @filelist = split(/\n/m,${$_});
+ foreach ($RunFiles{"text"}, $DocFiles{"text"}) {
+ my @filelist = split(/\n/m,$_);
+ next if (! @filelist);
foreach (@filelist) {CheckFileExistence($_)};
};
MergeDirectories([EMAIL PROTECTED]);
- MergeDirectories([EMAIL PROTECTED]);
+ MergeDirectories([EMAIL PROTECTED]) if (@DocFiles);
print $pkg_header . "\n @RunFiles @DocFiles";
};
if ( /^tetex-src$/ ) {
_______________________________________________
Pkg-tetex-commits mailing list
[email protected]
http://lists.alioth.debian.org/mailman/listinfo/pkg-tetex-commits
