summaryrefslogtreecommitdiff
path: root/Master
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2007-12-03 06:59:08 +0000
committerNorbert Preining <preining@logic.at>2007-12-03 06:59:08 +0000
commitfb262431c19afce0494dc3943df8fd3a483fa2ec (patch)
tree14db43a6a28848d4da8cad4677af0023a51619ec /Master
parent9c03f70819a69618c0fd3c919d0beba8f7fa0da4 (diff)
fixes for perl warnings
git-svn-id: svn://tug.org/texlive/trunk@5689 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
-rw-r--r--Master/tlpkg/TeXLive/TLPDB.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/Master/tlpkg/TeXLive/TLPDB.pm b/Master/tlpkg/TeXLive/TLPDB.pm
index 83943141b64..e415ae6b5b8 100644
--- a/Master/tlpkg/TeXLive/TLPDB.pm
+++ b/Master/tlpkg/TeXLive/TLPDB.pm
@@ -208,7 +208,7 @@ sub add_tlpcontainer {
if (defined($archrefs)) {
@archs = @$archrefs;
}
- my $cwd = getcwd;
+ my $cwd = getcwd();
if ($ziplocation !~ m,^/,) {
$ziplocation = "$cwd/$ziplocation";
}
@@ -228,9 +228,9 @@ sub _add_tlpcontainer {
# WARNING: If you change the location of the texlive.tlpdb this
# has to be changed, too!!
if (not(defined($dest))) {
- my $cwd = getcwd;
+ my $cwd = getcwd();
chdir($self->location . "/..");
- $dest = getcwd;
+ $dest = getcwd();
chdir($cwd);
}
my $container = "$ziplocation/$package";