summaryrefslogtreecommitdiff
path: root/Master/tlpkg
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2009-07-06 13:33:13 +0000
committerNorbert Preining <preining@logic.at>2009-07-06 13:33:13 +0000
commit8c7580d12e23be3829956344bfd96f7b10f2677d (patch)
treed21ead93b6e1d8c7ae43dd979d6d3587e02b5411 /Master/tlpkg
parent893023e717689b5474753dc3480e920e486440b9 (diff)
use right log in TLUtils
git-svn-id: svn://tug.org/texlive/trunk@14150 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg')
-rw-r--r--Master/tlpkg/TeXLive/TLUtils.pm12
1 files changed, 6 insertions, 6 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm
index 2d4cbe0cb90..7fce7812107 100644
--- a/Master/tlpkg/TeXLive/TLUtils.pm
+++ b/Master/tlpkg/TeXLive/TLUtils.pm
@@ -1836,13 +1836,13 @@ sub w32_add_to_path {
TeXLive::TLWinGoo::update_assocs();
my $path = TeXLive::TLWinGoo::get_system_env() -> {'/Path'};
$path =~ s/[\s\x00]+$//;
- log("Old system path: $path\n");
+ &log("Old system path: $path\n");
$path = TeXLive::TLWinGoo::get_user_env() -> {'/Path'};
if ($path) {
$path =~ s/[\s\x00]+$//;
- log("Old user path: $path\n");
+ &log("Old user path: $path\n");
} else {
- log("Old user path: none\n");
+ &log("Old user path: none\n");
}
my $mode = 'user';
if (admin() && $multiuser) {
@@ -1851,13 +1851,13 @@ sub w32_add_to_path {
adjust_reg_path_for_texlive('add', $bindir, $mode);
$path = TeXLive::TLWinGoo::get_system_env() -> {'/Path'};
$path =~ s/[\s\x00]+$//;
- log("New system path: $path\n");
+ &log("New system path: $path\n");
$path = TeXLive::TLWinGoo::get_user_env() -> {'/Path'};
if ($path) {
$path =~ s/[\s\x00]+$//;
- log("New user path: $path\n");
+ &log("New user path: $path\n");
} else {
- log("New user path: none\n");
+ &log("New user path: none\n");
}
}