summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xMaster/tlpkg/bin/ctan2tds8
1 files changed, 5 insertions, 3 deletions
diff --git a/Master/tlpkg/bin/ctan2tds b/Master/tlpkg/bin/ctan2tds
index eaf85e9c50b..efb9145b20e 100755
--- a/Master/tlpkg/bin/ctan2tds
+++ b/Master/tlpkg/bin/ctan2tds
@@ -1305,11 +1305,13 @@ sub xchdir
#
sub MAKEcopy {
my $dest = $_[0] || $DEST;
+ my $pdir = $packagedir;
+ if (defined($_[1])) { $pdir .= "/$_[1]"; }
- chomp (my $abspackagedir = `cd $packagedir && pwd`);
+ chomp (my $abspackagedir = `cd $pdir && pwd`);
print "\t COPY from $abspackagedir to $dest\n";
- &xchdir ($packagedir);
+ &xchdir ($pdir);
&SYSTEM ("mkdir -p $dest");
# do the copy.
@@ -2085,7 +2087,7 @@ sub MAKEperltex {
sub MAKEpgf
{
print "\t SPECIAL pgf\n";
- &MAKEcopy ("$DEST/tex");
+ &MAKEcopy ("$DEST/tex", "base");
chdir ("$DEST/tex") || die "chdir($DEST/tex) failed: $!";
print "\t SPECIAL move tex/doc/generic/pgf to doc/generic/pgf\n";