Handle spaces for Python install location in MSVC scripts

Attempting to use an installation path of Python that includes spaces
caused the MSVC builds to fail.  This fixes the issue by using the same
quoting method as ad7595b for OpenSSL.

Author: Victor Wagner
Discussion: https://postgr.es/m/20200430150608.6dc6b8c4@antares.wagner.home
Backpatch-through: 9.5

diff --git a/src/tools/msvc/Mkvcbuild.pm b/src/tools/msvc/Mkvcbuild.pm
index 72a21dbd419437362464480f8d911e874481509c..6daa18f70ecbf78eda035c3a6f0c882980446233 100644 (file)
--- a/src/tools/msvc/Mkvcbuild.pm
+++ b/src/tools/msvc/Mkvcbuild.pm
@@ -498,7 +498,7 @@ sub mkvcbuild
        my $pythonprog = "import sys;print(sys.prefix);"
          . "print(str(sys.version_info[0])+str(sys.version_info[1]))";
        my $prefixcmd =
-         $solution->{options}->{python} . "\\python -c \"$pythonprog\"";
+         qq("$solution->{options}->{python}\\python" -c "$pythonprog");
        my $pyout = `$prefixcmd`;
        die "Could not query for python version!\n" if $?;
        my ($pyprefix, $pyver) = split(/\r?\n/, $pyout);