1 files changed, 1 insertions, 1 deletions
diff --git a/Master/install-tl b/Master/install-tl
index e0d835a40d0..eb38d363f3f 100755
--- a/Master/install-tl
+++ b/Master/install-tl
@@ -1864,7 +1864,7 @@ sub flushlog {
   my $fh;
   my $logfile = "install-tl.log";
   if (open (LOG, ">$logfile")) {
-    chomp (my $pwd = `pwd`);
+    chomp (my $pwd = Cwd::getcwd());
     $logfile = "$pwd/$logfile";
     print "$0: Writing log in current directory: $logfile\n";
     $fh = \*LOG;