summaryrefslogtreecommitdiff
path: root/src/tools/msvc/Install.pm
diff options
context:
space:
mode:
authorAndrew Dunstan <andrew@dunslane.net>2019-02-05 18:57:12 -0500
committerAndrew Dunstan <andrew@dunslane.net>2019-02-05 19:34:17 -0500
commit42345284c7992a9c0022fb1035c13303fe160f90 (patch)
treeaf855d06c05278e3f8613e0a459b5c27b661e9cc /src/tools/msvc/Install.pm
parent772d4b769d30090dbf4434d7d192569b11371a53 (diff)
Fix included file path for modern perl
Contrary to the comment on 772d4b76, only paths starting with "./" or "../" are considered relative to the current working directory by perl's "do" function. So this patch converts all the relevant cases to use "./" paths. This only affects MSVC. Backpatch to all live branches.
Diffstat (limited to 'src/tools/msvc/Install.pm')
-rw-r--r--src/tools/msvc/Install.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/tools/msvc/Install.pm b/src/tools/msvc/Install.pm
index 1eb59091cf3..17a915496c3 100644
--- a/src/tools/msvc/Install.pm
+++ b/src/tools/msvc/Install.pm
@@ -58,8 +58,8 @@ sub Install
# suppress warning about harmless redeclaration of $config
no warnings 'misc';
- do "config_default.pl";
- do "config.pl" if (-f "config.pl");
+ do "./config_default.pl";
+ do "./config.pl" if (-f "config.pl");
}
chdir("../../..") if (-f "../../../configure");