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:33:42 -0500
commit77173d0cca4df1df1f423a467e2af4a4db9a0d10 (patch)
treea4be50a39ee22ecbe764a7ccf0cbefa3a8fec1cb /src/tools/msvc/Install.pm
parent99eb3bba649b5a48fa9b679b6d94334ca110e1db (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 60b5639df85..1e388ca3b6e 100644
--- a/src/tools/msvc/Install.pm
+++ b/src/tools/msvc/Install.pm
@@ -59,8 +59,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");